Рандомом задается трехзначное число, надо вывести его словами (pascal)

170

285

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

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

Sofa29122005

Информатика

4,5(68 оценок)

// pascalabc.net 3.2, сборка 1338 от 16.11.2016 begin var s100: =arr('','сто','двести','триста','четыреста','пятьсот', 'шестьсот','семьсот','восемьсот','девятьсот'); var s10: =arr('','десять','двадцать','тридцать','сорок','пятьдесят', 'шестьдесят','семьдесят','восемьдесят','девяносто'); var s11: =arr('','одиннадцать','двенадцать','тринадцать','четырнадцать', 'пятнадцать','шестнадцать','семнадцать','восемнадцать', 'девятнадцать'); var s1: =arr('','один','два','три','четыре','пять','шесть', 'семь','восемь','девять'); var n: =readinteger('укажите трехзначное натуральное число'); var s: =s100[n div 100]; var n10: =(n div 10) mod 10; var n1: =n mod 10; case n10 of 0: if n1> 0 then s: =s+' '+s1[n1]; 1: if n1=0 then s: =s+' '+s10[1] else s: =s+' '+s11[n1]; else begin s: =s+' '+s10[n10]; if n1> 0 then s: =s+' '+s1[n1] end end; writeln(s) end.

egoroff1271

Информатика

4,5(32 оценок)

эвм - סּ ٤קּ 1 ·, ฬᚨ ᚩ ᚪ ᚫ ᚳᚴᚵᚶᚷᚸᚹ, ∫ ξ§ , ∫ љ ط ωљᚱ ᚱ ω ∫ ξ.

телефон - ᚕᚖᚠᚡ, ᚢ ᚕᚖᚠ, ᚢᚤᚥᚦᚭᚮᚲ ᚳᚴᚵᚶᚷᚸᚹ, ᚺᚻᚼᚽ, ᚾᚿᛁᛃᛄ, ᛅᛆᛇᛈ ᛉᛊᛋ ᛏ ᛑᛒᛓᛔᛕ ᛝᛞᛟ, ᛠᛡ ᚪᚫ๓.

компьютер - ᛤᛥᛦ, ᛩᛪᛮᛯᛰ, ᚯ ᚰᛖ ᛗ∫љᛘ ᛚᛛᛜ, ᚧ, ᚬᚪᚫ ๓, ٤קּ.

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

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

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

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

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

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

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

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

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

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