Ответы на вопрос:
Pascalabc.net 1) var i,s,p : integer; begin s : = 0; p : = 1; for i : = 3 to 18 do if (i-2) mod 3 = 0 then begin s : = s + i; p : = p * i; end; writeln ('s=',s); writeln ('p=',p); end.2)программа не зачисляет процент в первый год, если нужно, чтобы зачислила, то поменяй местами строки вывода и присвоения внутри цикла var i : integer; s : real; begin s : = 10000; for i : = 2010 to 2015 do begin writeln (i,'-',s); s : = s * 1.1; end; end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
knowyourway5420.11.2021 11:38
-
yanami1801201603.12.2022 17:50
-
Artem114309.03.2020 03:49
-
elizka07040828.06.2021 19:00
-
AbstergoAlexander22.09.2020 14:12
-
Helen1123456789018.11.2021 04:24
-
HelpmeTT16.07.2020 02:46
-
pipar9322.04.2021 09:49
-
ХлойкаПрайс31.01.2023 06:00
-
чулпан200807.06.2020 07:40
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.