Войти
Регистрация
Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Показать больше
Показать меньше
KaRaIcHiTaN
07.03.2023 19:41 •
Информатика
Написать программу в паскале в банк под 3% годовых кладут 1000 рублей. через сколько лет сумма на вкладе будет 1500 рублей?
Показать ответ
Ответ:
ОтличницаDashaE
06.07.2020 01:47
Var
a:real;
b, c: integer;
begin
b:=0;
a:=1000;
while a<=1500 do
begin
a:=a+(a*0.03);
inc(c);
end;
write ('Через ', c,'лет ');
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
islamreal99
26.07.2021 10:27
Логические выражения: 1. f= b (a + amb) 2. f = (a+c) (a + c) - (в + с) 3. featb+a - bab+bc 4. f = a b-c+ab+a - в - с+а - вс 5. f = a - b+b : с+с.а 6. f = a. b+a...
Lika39211
14.05.2020 09:02
Соч информатика 5 класс 2 четверть...
Касандра0077
05.09.2020 10:21
Укажите имя файла, удовлетворяющее маске: ? ba*r.? xt.1. bar.txt2. bar.xt3. obar.txt4. barr.txt...
vladimir00041
24.01.2021 06:07
Реши на переустановку чисел: расположи три числа 4,6,2 в порядке убывания. 1 начало 2 сравни первое и второе числа; если первое меньше второго то поменяй их местами....
nikakrasovska
07.06.2020 06:30
1. скорость передачи данных по каналу равна 256000 бит/с. по каналу было передано 625 кб информации. в течении скольких секунд шла передача? 2. файл объемом 875...
flanyshkatop
07.06.2020 06:30
Переданное сообщение содержит 1125 байтов информации, записано в 8-символьном алфавите и занимает 5 страниц. каждая страница содержит 25 строк. сколько символов...
Sasha0102051
17.03.2020 22:48
часто в жизни нам приходится, находить (угадывать, вычислять) правило по которому происходит обработка информации. попробуйте определить в следующих примерах правила...
Yita
17.05.2022 21:50
Вставить место пропусков команды. Логомиры 3.0...
lenasavostyanova
15.05.2022 16:03
Даны два числа N и M . Составить программу для определения знака произведения этих чисел. На экран должно выводится сообщение о том, положительно, отрицательно или...
bogds2001
26.02.2022 00:01
5. Для того чтобы использовать информацию из сети Интернет без нарушения прав, нужно… ( верных ответов 3 )a) показать источникb) написать имя автораc) поместить...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
a:real;
b, c: integer;
begin
b:=0;
a:=1000;
while a<=1500 do
begin
a:=a+(a*0.03);
inc(c);
end;
write ('Через ', c,'лет ');
end.