Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Паскаль, Turbo Pascal, PascalABC.NET
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 12.01.2009, 11:48   #1
мелкая007
 
Регистрация: 11.01.2009
Сообщений: 2
Восклицание Написать программу, определяющую, через сколько дней количество съеденных комаров превысит 100

царевна-лягушка съедает ежедневно на 20% комаров больше,чем в предыдущий день,и еще 2 комара.Написать программу ,определяющую,через сколько дней количество съеденных комаров превысит 100,если в превый день было съедено 12 комаров.
мелкая007 вне форума Ответить с цитированием
Старый 12.01.2009, 13:22   #2
alex_fcsm
Участник клуба
 
Аватар для alex_fcsm
 
Регистрация: 10.11.2008
Сообщений: 1,502
По умолчанию 3

Код:
var n,i:integer;
begin
n:=12;
i:=0;
repeat
n:=round(n*1.2)+2;
inc(i);
until n>100;
writeln(i);
end.
Нормальное состояние техники - нерабочее, все остальное частный случай.
alex_fcsm вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Как сделать прогу чтобы показывать сколько дней осталось до... Bigtyoma Общие вопросы Delphi 20 23.12.2016 06:23
Отредактируйте,пожалуйста,задачу на записи, вычисляющую дату через m дней. JiLiYa Паскаль, Turbo Pascal, PascalABC.NET 2 26.12.2008 09:29
написать программу, которая считает количество цифр в введенной строке 111111 Общие вопросы C/C++ 2 17.12.2008 11:30
Составить программу, определяющую количество чисел, делящихся без остатка на три phoenixSV Паскаль, Turbo Pascal, PascalABC.NET 2 05.12.2008 15:05
Количество дней в месяце по диапазону дат VadimSh Microsoft Office Excel 6 26.11.2008 23:48