program n1;
var q,w:integer;
begin
w:=10;
while w<=98 do begin
q:=q+w;
w:=w+2;
end;
print(q);
end.
Объяснение:
