Написать программу, выводящую на экран числа 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
Не нашли ответ?
Ответить на вопрос
Похожие вопросы