2 Написать программу, которая позволяет вычислить сумму ряда

sematom sematom    3   17.04.2020 12:21    0

Ответы
папа11111111111111 папа11111111111111  13.10.2020 10:23

===PascalABC.NET===

program ;

var

 x, y :integer;

begin

 x:= 5;

 y:= 8;

 repeat

   x += y;

   y += 3;

 until y > 32;

 WriteLn(x);

end.

ответ: 185

Также прилагаю файл программы.

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