В зависимости от введенного числового значения вывести согласованное с ним слово рубль, рубля или рублей.
Математическая формулировка задачи:
Очевидно, что значение поясняющего слова зависит от последней цифры введенного числа:если последняя цифра 0, 5, 6, 7, 8, 9,то поясняющее слово «рублей», если 1 – то «рубль», если 2, 3, 4 – то «рубля». Исключение составляют числа, оканчивающиеся на 11, 12, 13, 14 для которых поясняющее слово должно быть «рублей».
Текст программы к задаче 4:
ProgramEx_4;
Uses Crt;
Var
Алгоритм решения задачи 4: n: integer; { число }
r: integer; {остаток от деления числа на 10}
Begin
ClrScr;
Writeln(‘Введите число ‘);
Readln(n);
If n>100 then n:=n mod 100;
If (n>=11) and (n<=14) then
Writeln( ‘ рублей‘);
