Составьте программу, которая по введенному вами k - числу грибов печатает фразу , причем согласовывает окончание слова с числом k. количество грибов может быть любым целым числом: 1, 3, 34, 127 и т.д. окончание фразы определяется значением последней цифры.
151
297
Ответы на вопрос:
Var g,i: integer; begin read(g); if (g=1) or ((g> 20) and (g mod 10=1)) then begin writeln('мы нашли в лесу ',g,' гриб'); i: =1; end; if ((g mod 10> 1) and (g mod 10< 5)) or ((g> 21) and (g mod 10> 1) and (g mod 10< 5)) then begin writeln('мы нашли в лесу ',g,' гриба'); i: =1; end; if i=0 then writeln('мы нашли в лесу ',g,' грибов'); end.
Var a: integer; begin write('a = '); readln(a); if (a mod 2) = 0 then a : = a div 4 else a : = a*5; writeln('a = ', a); end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
kristinakomaro506.05.2021 02:29
-
bililife28.03.2022 07:46
-
stas249127.02.2022 11:06
-
СлишкомУмная127.05.2021 04:39
-
tinafortinova7809.12.2021 15:22
-
Dav13411.07.2022 03:27
-
ЗнайкаЗазнайка22805.09.2020 10:32
-
vika26vf06.05.2023 19:49
-
Qkoddk24.12.2022 12:34
-
vika3v17.10.2020 06:33
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.