Question

Запиши схему на языке Паскаль. 15 баллов.

Answer 1

Ответ:

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.

Объяснение: