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

race201 race201    2   14.12.2021 22:58    0

Ответы
lejaqw lejaqw  14.12.2021 23:00

Программа:

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

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика