Наводнение продолжалось ровно сутки. В первый час вода в реке поднялась ** 1 дюйм, во...

0 голосов
130 просмотров

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


Информатика (40 баллов) | 130 просмотров
Дан 1 ответ
0 голосов

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

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

(16 баллов)