Одноклеточная амеба каждые 3 часа делится на 2 клетки. Определить сколько будет амеб через 3,6,9,12, .... 24 часа (КуМир)

program lol;vara,b,c,d:Integer;beginb:=1;for a:=1 to 8 do beginb:=b*2;c:=a*3;writeln('Кол-во амеб через ',c,' часов - ',b);end;End.