ПАСКАЛЬ:Требуется преобразовать введённое дробное число в денежный формат. Например, число «12.34» должно быть представлено в виде «12 rub 34 kop».
ФОРМАТ ВХОДНЫХ ДАННЫХ:
Вводится одно неотрицательное вещественное число, которое не превосходит 10в 5 степени, задано с точностью до двух знаков после запятой.
ФОРМАТ ВЫХОДНЫХ ДАННЫХ:
Выведите данное число в денежном представлении. Выводить ведущие нули в количестве копеек не нужно.

var s:string;n:real;q:integer;beginreadln(n);writeln(trunk(n),' rub ',trunk(n*100) mod 100,' kop');end.