Ответы на вопрос:
Программа может быть такой: uses crt; var a, b, c: integer; begin clrscr; write('a='); readln(a); write('b='); readln(b); write('c='); readln(c); if (a mod 5)=0 then writeln(a, ' - кратно 5') else writeln (a, ' - не кратно 5'); if (b mod 5)=0 then writeln(b, ' - кратно 5') else writeln (b, ' - не кратно 5'); if (c mod 5)=0 then writeln(c, ' - кратно 5') else writeln (c, ' - не кратно 5'); readln; end.
Program n_5; var a, b: real; c: integer; begin write('введите стоимость тетради - '); readln (a); write('введите стоимость обложки - '); readln (b); write('введите кол-во тетрадей - '); readln (c); if (a < = 0) or (b < = 0) or (c < = 0) then exit; writeln; write('итого: ', trunc(c * (a + ' руб. ', * (a + b)) - (trunc(c * (a + *100), ' коп.'); end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
Ovaliza28.02.2020 23:31
-
BasketballGrand19.05.2023 11:27
-
НяшаАнька10.02.2022 20:35
-
egorshihov9816.04.2021 12:10
-
Game777World21.05.2023 03:49
-
Venera87928.03.2023 01:52
-
KultchiK17.01.2022 22:12
-
KatyaTishkina05.08.2021 15:53
-
schaposchnyk13.12.2022 12:30
-
Molyaa9723.11.2020 14:36
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.