Наводнение продолжалось ровно сутки. В первый час вода в реке поднялась на 1 дюйм, во второй на 2, в третий на 3, и т.д. На сколько дюймов поднимется уровень воды за сутки. (Дана программа вычисления суммы 24 членов ряда:1+2+3+...
Наводнение продолжалось ровно сутки. В первый час вода в реке поднялась на 1 дюйм, во второй на 2, в третий на 3, и т.д. На сколько дюймов поднимется уровень воды за сутки. (Дана программа вычисления суммы 24 членов ряда:1+2+3+...+n)
Сделайте простенькую программу для уровня 9 класса. ПАСКАЛЬ
Гость
Ответ(ы) на вопрос:
ГостьПервый вариант
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.
Не нашли ответ?
Похожие вопросы