составте блок схему для решения :
program abc;
var a,b,i:integer;
begin
a:=3;
b:=1;
for i:=1 to 8 do
begin
b:=2*b;
writeln ('количество амеб через',a,'часов',b);
a:=a+3;
end;
end.
ДА Я ТУПОЙ ХЕЛП МИ РЕБЯТ,СХЕМА ОЧ НУЖНА