В записи алгоритма вычисления значения выражения (х2- 5х+5) / (х6- 4х2+3) Злоумышленник одно действие поставил не на свое место. Вот как стал выглядеть алгоритм:
1. ввести х
2. если х6- 4х2 + 3=0, то:
3. сообщить “При таком х значение выражения не определено”.
4. иначе:
5. присвоить у значение (х2- 5х +5) /(х6- 4х2+3) .
6. конец ветвления.
7. сообщить у.
Верните действие на свое место.

program xxx;   var i, n, max : integer;         s : real;         a : array [1..20] of integer; begin  write ('введите n= ');   readln(n);   for i: =1 to n do      readln (a[i]);   max: = a[1];   for i: =1 to n do      if a[i] > max then max : = a[i];   s: = sqrt(max);   write ('корень из наибольшего эл-та =', s)end.

256= 2^i=2^8следовательно i=8 битов

8*80*32=20480 битов

20480*2=40960 битов=5120 байт=5 килобайт

^ - это я так обозначила степень

i - количество информации(обычно обозначается большой буквой)

* - умножить

f0=(15*16в1)+(0*16в0)=240 , делим столбиком число 240 на 2 (делим и делим) и записываем остатки с конца и получаем число 11110000

т.е.  240/20=120    ост  0

120/2=60    ост  0

60/2=30   ост  0

30/2=15  ост  0

15/2=7   ост  1

7/2=3   ост  1

3/2=1   ост  1

записываем в обратном поряде    11110000

1d4=(1*16в2)+(13*16в1)+(4*16в0)=256+208+4=468  делим столбиком число 468 на 2         111010100

var a: integer;

begin

    read(a);

    a: =a*a;

    a: = a*a;

    writeln(a);

end.