Вопрос по информатике:
написать прогпамму, которая после введенного с клавиатуры числа(в диапозоне от 1 до 999), обозначающий денежную еденицу, дописывал слово "рубль". Например 12 рублей, 2 рубля, 1 рубль и т.п. (Geany, pascal)
- 01.08.2018 23:22
- Информатика
- remove_red_eye 9455
- thumb_up 79
Ответы и объяснения 1
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.
- 02.08.2018 23:09
- thumb_up 10
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.