var S, k: integer;
begin
S:=0; k:=20;
while k<=50 do
s:=s+k;
k:=k+2;
end;
writeln('Сумма чисел=', s);
end.
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
var S, k: integer;
begin
S:=0; k:=20;
while k<=50 do
begin
s:=s+k;
k:=k+2;
end;
writeln('Сумма чисел=', s);
end.