Если вы пройдёте по лабиринту, собирая двоичные числа и переводя их в десятичные, то в результате
получите метафору, которая относится к чёрствому, нечувствительному человеку (полученные числа
замените соответствующими буквами с теми же порядковыми номерами).
Записать процесс перевода каждого числа в тетради и проверить результат при Калькулятора.

1.

var n: integer; begin  cls;   for n: =1 to 10 do begin    write('n=',sqr(n)+5,' ');   end; end.

решить на паскале?

program mss; uses crt; var v,m,h,r: real; beginclrscr; writeln('введите радиус'); readln(r); writeln('введите высоту'); readln(h); v: = 3.14*sqr(r)*h; m: = 1200*v; writeln('    ',m: 2: 2,' кг'); readln; end.

1. нужно найти сколько бит весит обна буква.

64 это 6 бит информации.

2. i=6*20= 120 бит

мы умножыли биты на количество используемых букв.

вот и

program zadacha6; var a,b: real; begin readln(a,b); if a> b then writeln (a) else writeln (b); end.

не? я не уверен