Известно, что все современные компьютеры используют двоичную систему счисления. но некоторые исследователи считают, что компьютеры на троичной, четверичной и других системах счисления будут работать быстрее. вычислительная компания xyz закупила новые экспериментальные компьютеры, но её сотрудники не знают, в какой системе счисления новые компьютеры результаты их вычислений. им определить их результаты в традиционной десятичной системе, если известно, что последовательность цифр n, которую выдает экспериментальный компьютер, записана в минимально возможной для этого системе счисления. примечания тест №1: n = 123 тест №2: n = 796 тест №3: n = 60452 тест №4: n = 101001 тест №5: n = 32674 тест №6: n = 306973 тест №7: n = 123042 тест №8: n = 202122 тест №9: n = 871856 тест №10: n = 125341

N1: 27

N2: 796

N3: 14639

N4: 41

N5: 13756

N6: 13756

N7: 123042

N8: 557

N9: 519747

N10: 11581

Информация, которую мы получаем из окружающего мира, поступает к нам в виде условных знаков или сигналов самой разной физической природы.

Это свет, звук, запах, касания; это слова, значки, символы, жесты и движения.

Для того чтобы произошла передача информации, мы должны не только принять сигнал от кого-то, но и расшифровать его.

Так, услышав звонок будильника, человек понимает, что пришло время телефонный звонок — кому-то нужно с нами поговорить;

школьный звонок сообщает учащимся о долгожданной перемене.

Для правильного восприятия разных сигналов требуется разработка кода, или кодирование.

Код — это система условных знаков для представления информации.

Кодирование — это перевод информации в удобную для передачи, обработки или хранения форму с некоторого кода.

1)

program FunctionIFfull;

uses crt;

var

 x, y : real;

begin

 clrscr;

 write('x = ');

 readln(x);

 if x>=1 then y:= sqrt(3*x+4)  

 else  

     if x<=-1 then y:= sqr(x)+4*x  

     else y:=4*sqr(x)-2*x+3;

 writeln('y = ', y:8:2);

 readln;

end.

2)

program FunctionIFshort;

uses crt;

var

 x, y : real;

begin

 clrscr;

 write('x = ');

 readln(x);

 if x>=1 then y:= sqrt(3*x+4);

 if x<=-1 then y:= sqr(x)+4*x;

 if (x>-1) and (x<1) then y:= 4*sqr(x)-2*x+3;

 writeln('y = ', y:8:2);

 readln;

end.

Объяснение:

1. Повна команда розгалуження має вигляд

if < логічний вираз > then <команда 1> else < команда 2 >;

2. Коротка команда розгалуження має вигляд

if <логічний вираз > then <команда 1>;