Var i, sum: integer;
for i:=a to b do
begin
sum:= sum + i*i;
writeln(sum);
end;
writeln();
writeln(sum);
10*32*48*2=30720 байт
Ответ: 30720/1024=30Кбайт, вариант 3
Блок-схема - в прилагаемом файле.
Допустим: Папа родился в 1977 , но он младше мамы по месяцам и дням. Мама родилась на 2 года позже папы , в мае 5.