Вычислить сумму ряда чисел 2+4+6...+50
Program n1;
var s,a:real;
begins:=0;
a:=0;
while a<50 do
begin
a:=a+2;
s:=s+a;
end;
writeln(сумма=,s);
end.
Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!
