Ответ:
var
a:integer;
b,c:string;
begin
writeln('--------------------------');
writeln('---Программа знакомства---');
writeln('--------------------------');
writeln('Я персональный ЭВМ,');
writeln('А как зовут тебя?');
readln(b);
writeln('Сколько тебе лет?');
readln(a);
writeln('В каком классе ты учишься?');
readln(c);// цифра и буква
writeln('Рада познакомиться с тобой, '+b);
writeln('Молодец, в '+a+' лет написал такую программу!');
writeln('В твоём '+c+' классе все такие?');
end.
<h3>PascalABC.NET 3.4.2, сборка 1837 от 11.10.2018</h3><h3>Внимание! Если программа не работает, обновите версию!</h3>
begin
var a := ReadArrReal(8);
a[::-1].Println
end.
Из двоичной системы в десятичную получится вот такой ответ:100001=33
F=320*60*65*16 = 19968000 (бит)=19968000:8 (байт) =2496000(байт)=
=249000:1024 (Кбайт) =2437,5 (Кбайт)=
=2437,5:1024(Мбайт) ≈2,38 (Мбайт)
ответ: 1) 2 Мбайта