Написать программу, выводящую на экран числа 10, 20, 30, 40, 50, 60, 70, 80,90,100 с помощью цикла For, и подсчитывающую их сумму. (Паскаль)

Question

Информатика

Мартиниана

26 марта, 11:03

Написать программу, выводящую на экран числа 10, 20, 30, 40, 50, 60, 70, 80,90,100 с помощью цикла For, и подсчитывающую их сумму. (Паскаль)

+2

Ответы (1)

Знаете ответ?

Доминика · Answer 1

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