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

Ответы 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.

  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years