Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
moldirkenesova
30.10.2020 14:10 •
Информатика
Pascal. банковский вклад равен 2500 руб. процентная ставка 19 процентов годовых. через сколько лет банковский вклад станет 5000 рублей. требуется , учитель темы не объясняет
Ответ:
Fania2009
02.10.2020 11:13
Var
s: real;
n: integer;
begin
s := 2500;
n := 0;
repeat
s := 1.19 * s;
Inc(n)
until s >= 5000;
Writeln(n+1)
end.
Тестовое решение:
5
0,0
(0 оценок)
Популярные вопросы: Информатика
u95macsalinaанна
11.01.2020 02:01
Вам, должно быть, известно, что цвета некоторых изображений в компьютере закодированы тройками двузначных шестнадцатеричных чисел, соответствующих вкладу красного,...
Никk
11.01.2020 02:01
Расставить 10 поисковых систем по популярности в порядке !...
oksana2000001
11.01.2020 02:01
Переставить элементы массива в порядке убывания...
krutikovaelizaozax2f
05.08.2021 18:02
Формула не может содержать 1) чисел 2) встроенных функций 3) пробелов 4) имен ячеек...
лиза22110
11.10.2022 14:57
При копировании формулы с относительной ссылкой 1) адрес ячейки изменяется в зависимости от нового расположения формулы 2) адрес ячейки остается прежним 3) используют...
Fgbjhjghhy1234567890
26.06.2021 08:35
Дослідити історію розвитку комп ютерної техніки в Україні та визначити, які досягнення має в цій сфері Україна та українці....
Saweretufio
20.05.2022 00:46
Для построения рисунков на координатной плоскости предназначен исполнитель …...
Leraekb2012
21.01.2022 01:59
4. Главная причина образования ветра – это…...
vitaly10
11.04.2020 19:40
очень нужно!! Как зделать Геометрические фигуры в скретч 2...
12345678901456619353
03.10.2021 09:13
Скажите что такое рамповоелыгркдаб...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
s: real;
n: integer;
begin
s := 2500;
n := 0;
repeat
s := 1.19 * s;
Inc(n)
until s >= 5000;
Writeln(n+1)
end.
Тестовое решение:
5