program p1;
var b,c:integer;
begin
c:=0;
b:=3;
while true do
if b > 10 then
break;
c:=c + b;
b:=b+2;
end;
writeln(b);
end.
Объяснение:
program p1;
var b,c:integer;
begin
c:=0;
b:=3;
while true do
begin
if b > 10 then
break;
c:=c + b;
b:=b+2;
end;
writeln(b);
end.
Объяснение: