По блок схеме составить программу , определяющую значение переменной б а:=5 b:=0

Ответ:

Объяснение:

Pascal:

var a,b:integer;

begin

   a:=5;

   b:=0;

   while a<>1 do

   begin

       a:=a-1;

       b:=b+a

   end;

   writeln(b)

end.