Паскаль, оператор выбора.
Помогите, пожалуйста, исправить ошибку в задании:
Дано натуральное число N (N<20), определяющее сумму денег в рублях. Дать для этого числа наименование: "рубль", "рубля", "рублей".
Приложения:
Ответы на вопрос
Ответил allangarsk
0
var n:integer;beginread(n);case n of1:writeln('рубль');2..4:writeln('рубля');5..20:writeln('рублей');elsewriteln('Условия не выполняется');end;end.
Новые вопросы
Геометрия,
1 год назад
История,
1 год назад
Математика,
7 лет назад
Химия,
7 лет назад
Алгебра,
8 лет назад