markzastawa

05.04.2023 04:34 •  Информатика

Что будет выведено на экране монитора после выполнения следующего фрагмента программы:

var i,a,b: integer;
begin
b := 8;
a := 3;
while (a <= b) do
begin
a := a *2+1 ;
write(a );
end;
end.