78

Написать прогпамму, которая после введенного с клавиатуры числа (в диапозоне от 1…

27 февраля 2023

Написать прогпамму, которая после введенного с клавиатуры числа (в диапозоне от 1 до 999), обозначающий денежную еденицу, дописывал слово «рубль» . Например 12 рублей, 2 рубля, 1 рубль и т.п. (Geany, pascal)

категория: информатика



99

program test; var number: integer; begin write ('Enter the number: '); readln (number); case number mod 10 of 1: writeln (number, ' рубль'); 2, 3, 4: writeln (number, ' рубля'); else writeln (number, ' рублей') end; readln; end.

Знаете ответ?


Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!
Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!
Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...