Дана последовательность чисел 1, 4, 7, 10, 13, - вопрос №37939791471013 от hey112 09.02.2023 05:13

Question

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

hey112 · Answer

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