Написать программу, выводящую на экран числа 10, 20, 30, 40, 50, 60, 70, 80,90,100 с помощью цикла
Написать программу, выводящую на экран числа 10, 20, 30, 40, 50, 60, 70, 80,90,100 с помощью циклаFor, и подсчитывающую их сумму. (Паскаль)
Гость
Ответ(ы) на вопрос:
Гость Var i,s:integer;
begin
s:=0;
for i:=1 to 10 do
begin
write(10*i,' ');
s:=s+10*i;
end;
writeln;
writeln('s = ',s);
end.
Результат:
10
20
30
40
50
60
70
80
90
100
s = 550
Не нашли ответ?
Похожие вопросы