Задание

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

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