Информатика, вопрос задал andrewzemko5 , 7 лет назад

(Паскаль)
5+10+15+… сумма скольких чисел равна 1890?

Ответы на вопрос

Ответил vimmortal2
1

Программа:

Pascal:

var

 n, i, summ: integer;

begin

 while summ < 1890 do begin

   i := i + 5;

   summ := summ + i;

   inc(n);

 end;

 writeln(n);

end.

Результат: 27


andrewzemko5: Спасибо!!!
Новые вопросы