Дана последовательность чисел 1, 4, 7, 10, 13, считать - вопрос №14710133794379 от PandaVo 24.11.2020 01:44

Question

Информатика: Дана последовательность чисел 1, 4, 7, 10, 13, считать сумму всех элементов этой последовательности до тех пор пока она не достигнет 1000

PandaVo · Answer

Var a,i,s:integer;begina:=4;s:=0;while a =1000 dobegins:=s+a;a:=a+3;end;writeln(s)end....