Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Х
Химия
Д
Другие предметы
Н
Немецкий язык
Б
Беларуская мова
М
Музыка
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
У
Українська література
Р
Русский язык
Ф
Французский язык
П
Психология
О
Обществознание
А
Алгебра
М
МХК
Г
География
И
Информатика
П
Право
А
Английский язык
Г
Геометрия
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
умник202323
24.01.2022 23:46 •
Информатика
Какова будет высота растения через х месяцев (6), если за месяц прирост составляет а% (5%). начальный рост – у см (20) . решение по турбо паскалю.
Показать ответ
Ответ:
АлiнаКукушкiна
02.10.2020 09:02
Var
A,ae:real;
N,i:integer;
Begin
WriteLn('Введи начальный рост');
ReadLn(A);
WriteLn('Введи кол-во месяцев');
ReadLn(N);
WriteLn('Введи прирост в месац в %');
ReadLn(ae);
ae:=ae/100;
For i:= 1 to N do
A:=A*(1+ae);
WriteLn(A);
ReadLn
End.
0,0
(0 оценок)
Популярные вопросы: Информатика
prostopohelnaxyi
24.01.2020 18:33
Вопрос 8. в алфавите некоторого языка используется 109 различных символов(сюда входят буквы, знаки препинания, скобки и иные специальные символы). определите минимальное количество...
Julianna2006
11.12.2021 08:44
По каналу связи сообщения, содержащие только буквы а, б, в, г, д, е. для передачи используется неравномерный двоичный код, удовлетворяющий условию фано; для букв а, б, в используются...
retrovaweforyou
11.12.2021 08:44
Объявить целочисленный массив из 10 элементов. заполнить массив случайными числами в интервале от 0 до 50.вывести исходный массив на экран. вывести на экран инвертированный экран,...
adamoon44
03.09.2022 03:30
В Python все данные называются: Укажите правильный вариант ответа: числами строками объектами переменными...
CNikolas2001
26.10.2022 05:23
Задача для пайтона про волка, козу и капусту напишите алгоритм для пайтона...
лис8889
20.12.2022 13:01
Написать правильно и побыстрее правильно и побыстрее...
елена430
24.09.2021 07:19
Скажи. Выполняем в тетрадиЗаполни таблицу в тетради.По какойПочему?1 Никогда не пытайся взломать информациюс установленным паролемпричине?2 Нельзя верить всем сведениям, полученнымиз...
IDontKnow46
05.01.2021 03:43
Знайдіть довжину кола вписаного в правильний шестикутник із площею 6√3 см²...
DenisYTYT
05.01.2021 03:43
Питання :1.ЩО ТАКЕ ЛІТЕРАТУРА? 2.Різновиди літератури? 3. Що періодична література? 4. Як видання та розповсюдження? 5. Що на літературні твори розповсюджується? 6.Соціологічна...
evstratovamash1
05.01.2021 03:43
Паралельне перенесення задано формулами х′ = х−3 і у′ = у +2. Знайдіть координати точки, у яку переходить центр кола, що задане рівнянням (х −1)2 + (у+1)2 = 4....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
A,ae:real;
N,i:integer;
Begin
WriteLn('Введи начальный рост');
ReadLn(A);
WriteLn('Введи кол-во месяцев');
ReadLn(N);
WriteLn('Введи прирост в месац в %');
ReadLn(ae);
ae:=ae/100;
For i:= 1 to N do
A:=A*(1+ae);
WriteLn(A);
ReadLn
End.