<span>2) каждому символу их двоичные коды</span>
//Я слабо себе представляю как выглядит блок-схема с подпрограммой, так что выкладываю два варианта
//Pascal ABC.NET v3.1 сборка 1219
Var s:real; i,j,d1,d2,r1,r2,k:integer;
function Simple(d,r:integer):real;
begin
Simple:=sqr(d)*(r-1130)*9.8/(18*0.6);
end;
begin
k:=0;
read(d1,d2,r1,r2);
for i:=d1 to d2 do
begin
for j:=r1 to r2 do
begin
s:=s+Simple(i,j);
inc(k);
end;
end;
s:=s/k;
writeln(s);
end.
Пример ввода:
1
5
2
4
Пример вывода:
-11249.1296296296
У нас имеется страниц - 2. В каждой 32 строки по 64 символа, значит общее количество символов будет 2*32*64 = 4096.
Теперь количество наших символов умножаем на информационный объем за символ, то есть для Unicode это 16 бит за символ.
4096 символов* 16 бит = 65536 бит.
8 бит = 1 байт.
1024 байта = 1 Кбайт
65536 бит / 8 = 8192 байта / 1024 = 8 Кбайт.
Ответ: 3) 8 Кб