Одноклеточная бактерия каждые три часа делится на две клеточки. Найти, через
Одноклеточная бактерия каждые три часа делится на две клеточки. Найти, через сколько часов станет более X амеб, если сначало она была одна. (С внедрением цикла, на языке Pascal)
Задать свой вопрос1 ответ
Zhenja Kobylinskaja
Var x,a,h:integer;
begin
read(x);
while alt;=x-3 do
begin
a:=a*2;
h:=h+3;
end;
writeln(h);
end.
вроде бы как то так у меня баги паскаля на компютере поэтому проверить не вышло. если что попробуй убрать "-3" в 4 строке. а так должно работать.
begin
read(x);
while alt;=x-3 do
begin
a:=a*2;
h:=h+3;
end;
writeln(h);
end.
вроде бы как то так у меня баги паскаля на компютере поэтому проверить не вышло. если что попробуй убрать "-3" в 4 строке. а так должно работать.
Aljona
Чуток-чуток поправила программку и вышло вот так:var x,a,h:integer;begina:=1;read(x);while a<=x do begina:=a*2;h:=h+3;end;writeln(h);end.Вроде бы всё срабатывает:)
Валерия Точаева
а да забыл а:=1
Анатолий Курлянов
ну если срабатывает означает хорошо ;)
, оставишь ответ?
Похожие вопросы
-
Вопросы ответы
Новое
NEW
Статьи
Информатика
Статьи
Последние вопросы
задание экономиоти
Рассмотри ситуацию: человек живёт на Крайнем Се-вере. С помощью каких
Экономика.
Человек живет на Крайнем Севере. С помощью каких благ удовлетворяются потребности
Экономика.
там лежат три яйца.у дома рос клен.Это гнездо сойки.на клёне гнездо
Русский язык.
Тыныштық күйіндегі карусель 35 с-та 3,0 рад/с бұрыштық жылдамдықпен үдей қозғалады.
Разные вопросы.
Сочинение на тему "Русский язык не сможет умереть!"
Математика.
Приветствую!
Меня зовут Станислав, я представляю компанию under.site.
Хотел бы предложить интересное решение
Разные вопросы.
Масса трёх одинаковых пакетов чая 180г чему равна масса
Математика.
Газообразный аммиак объёмом 2.24 л (н.у.) был полностью поглощён 14.68 мл
Химия.
Упражнение 2 Выпишите глаголы и вставьте пропущенные буквы
Русский язык.
Радиус окружности, описанной около равностороннего треугольника, равен 6. Найдите сторону треугольника
Геометрия.
Облако тегов