СРОЧНО!!! ОЧЕНЬ СРОЧНООО!!! ПОЖАЛУЙСТА ПОМОГИТЕ СДЕЛАТЬ....Как это задание записать в...

0 голосов
26 просмотров

СРОЧНО!!! ОЧЕНЬ СРОЧНООО!!! ПОЖАЛУЙСТА ПОМОГИТЕ СДЕЛАТЬ....Как это задание записать в турбо паскаль, какой код нужно написать...Напишите пожалуйста)))
Задание по теме циклы: "Одноклеточная амеба каждые 3 часа делится на 2 клетки. Определить, сколько амеб будет через 3, 6, 9, 12, ..., 24 часа?"


Информатика (2.1k баллов) | 26 просмотров
Дан 1 ответ
0 голосов
Правильный ответ

Var t,n:integer;
begin
n:=1;
t:=3;
writeln('t','n':6);
while t<25 do<br>  begin
  n:=n*2;
  writeln(t,n:6);
  t:=t+3;
  end;
readln;
end.

0

в первой строчке я написала program example, а дальше со следующей строки то что вы написали ввела

0

Не может быть, чтобы не работала. Проверена. Что комп пишет?

0

Ничего не пишет, просто игнор...http://znanija.com/task/6761622 вот как я написала.

0

А о каком окне ввода речь? Тут ввода нет. Печатается сразу таблица и все

0

чтобы проверить работает ли нужно нажать кнопку "Run" ?

0

Да, и все.

0

Все, заработало, забыла точку с запятой поставить...Спасибо вам огромное))))

0

У тебя все знаки верно были поставлены

0

Если поставить, то работа программы будет другая, неверная

0

Ты не написала предпоследнюю строку: readln;