Для этого сначала переведем 33554432 в биты получилось:
33554432 = 33554432
Теперь переведем его в мегабайты
33554432 = 4
Var a, b:real;
begin
readln(a, b);
writeln('Площадь равна ', a*b);
writeln('Периметр равен ', 2*(a + b));
end.
Решение в приложенном файле.
Ответ 78
1 байт = 8 бит
1 килобайт = 1024 байт
<span>1 килобайт = 8192 бит</span>