53,42,-37,-75(Должно так получиться)
Var
amoebas, t: integer;
begin
amoebas := 1;
t := 0;
repeat
t := t + 3;
amoebas := amoebas * 2;
Writeln(amoebas, ' амеб через ', t, ' часа');
until t >= 24;
end.
Чтобы знайти t нужно t =u/I
и того t=64 секунды
В С++ ввод значения переменной реализуется с помощью оператора cin, то есть cin >> a;