Одноклеточная амеба каждые 3 часа делится на 2 клетки. Сколько амеб будет через 15 часов? Программа паскаль.
Program gt; var i,a:integer; begin read(A); {A-начальное аол-во амеб} for i:=1 to 5 do begin a:=a*2; end; writeln(A); end.