program ms301;
var a,b,c:integer;
begin
writeln('Введите три числа');readln(a,b,c);
A:=sqrt(a);
B:=sqrt(b);
c:=sqrt(c);
writeln(a,', ',b,', ',c);
readln;
end;
1 символ=8 бит
40 символов= 40 (символы) * 8 (бит)
40 строк по 40 символов= 40 (строк) * 40 (символы) * 8 (бит)
48 страниц по 40 строк по 40 символов= 48 (страниц) * 40 (строк) * 40 (символов) * 8 (бит)
40*8*48*40 = 614,400 бит
614 400 бит = 76,800
76,800 = 75 Кбайт
Получится 75 Кбайт,первый вариант.
Program n1;
var sum,a: real;
i: integer;
begin
i:=0;
sum:=0;
while i<10 do
begin
readln(a);
sum:=sum+a;
i:=i+1;
end;
write(sum);
end.
Глаза-зрительная,
руки-щупательная,
уши-слуховая,
язык-вкусовая,
нос-обонятельная.
Непонятная - какой небуть очень длинный и замудрённый пример по алгебре та и ещё на районной олимпиаде (не усваимая)!!!