Запишите блок схему ** язык паскаля

Question

Запишите блок схему на язык паскаля

---

Answer 1

var a: integer;
begin
a:=1;
while a<100 do<br> a:=(a+2)*2;
writeln(a);
end.