Паскаль: требуется преобразовать введённое дробное число в денежный формат. например, число «12.34» должно быть представлено в виде «12 rub 34 kop». формат входных данных: вводится одно неотрицательное вещественное число, которое не превосходит 10в 5 степени, задано с точностью до двух знаков после запятой. формат выходных данных: выведите данное число в денежном представлении. выводить ведущие нули в количестве копеек не нужно.
n:real;
q:integer;
begin
readln(n);
writeln(trunk(n),' rub ',trunk(n*100) mod 100,' kop');
end.