Question

Наводнение продолжалось ровно сутки. в первый час вода в реке поднялась на 1 дюйм, во второй на 2, в третий на 3, и т.д. на сколько дюймов поднимется уровень воды за сутки. (дана программа вычисления суммы 24 членов ряда: 1+2+3++n) сделайте простенькую программу для уровня 9 класса. паскаль

Answer 1

Первый вариант
begin 
for var i:=1 to 24 do 
begin   
writeln('Вода поднялась на ',i,' дюйм'); 
end;  
end.

Второй
Program kry;
var i:integer;
begin 
while i<24 do begin   
i:=i+1;   
writeln('Вода поднялась на ',i,' дюйм'); 
end;  
end.