Для целого числа к от 1 до 99 напечатать фразу "мне k лет",учитывая при этом, что при некоторых значениях k слово "лет"надо заменить на слово год или года.например,11 лет, 22 года,51 год. паскаль,

161

193

Посмотреть ответы 2

Ответы на вопрос:

Nastyled

Информатика

4,4(94 оценок)

Var let: array [1..63] of integer = (5 , 6, 7, 8, 9, 10, 11, 12, 13, 14, 15 ,16 ,17 , 18, 19 , 20, 25, 26, 27, 28, 29,30, 35, 36, 37, 38, 39, 40, 45, 46, 47, 48, 49, 50, 55, 56, 57, 58, 59, 60, 65, 66, 67, 68, 69, 70, 75, 76, 77, 78, 79, 80, 85, 86, 87, 88, 89, 90, 95, 96, 97, 98, 99); gad: array [1..9] of integer = (1, 21, 31, 41, 51, 61, 71 ,81 ,91); goda: array[1..27] of integer = (2,3,4,22,23,24,32,33,34,42,43,44,52,53,54,62,63,64,72,73,74,82,83,84,92,93,94); k: integer; begin for k: =1 to 99 do begin if k = let then begin writeln('мне', k, 'лет'); end; if k = gad then begin writeln('мне', k, 'год'); end; if k = goda then begin writeln('мне', k, 'года'); end; end; end.

supernogai

Информатика

4,7(13 оценок)

// pascalabc.net 3.3, сборка 1599 от 17.12.2017 // внимание! если программа не работает, обновите версию! begin var (a,q): =readreal2('введите начальный член и знаменатель: '); var n: =readinteger('введите количество членов прогрессии: '); var s: =a; for var i: =2 to n do begin a*=q; s+=a end; writeln('сумма членов прогрессии равна ',s) end. пример введите начальный член и знаменатель: 1.25 0.13 введите количество членов прогрессии: 15 сумма членов прогрессии равна 1.43678160919533

Реши свою проблему, спроси otvet5GPT

Быстро
Мгновенный ответ на твой вопрос
Точно
Бот обладает знаниями во всех сферах
Бесплатно
Задай вопрос и получи ответ бесплатно

Задай свой вопрос

Популярно: Информатика

Есть вопросы?

Как otvet5GPT работает?

otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса.
Сколько это стоит?

Проект находиться на стадии тестирования и все услуги бесплатны.
Могу ли я использовать otvet5GPT в школе?

Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое!
В чем отличия от ChatGPT?

otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.