var n, s : integer;
begin
n:=14; s:=0;
while n <=18 do begin s:=s+25; n:=n+1 end;
write(s)
end.
Ответ: 125
var n, s : integer;
begin
n:=14; s:=0;
while n <=18 do begin s:=s+25; n:=n+1 end;
write(s)
end.
Ответ: 125