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

Question

78

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

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

ответить

в избранное ссылка

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

moses · Accepted Answer

99

moses

10 сентября 2022

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.

комментировать

в избранное ссылка отблагодарить

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль: