Составьте программу, которая преобразует введенное с клавиатуры дробное число в денежный формат. Например, число 12,348 должно быть преобразовано к виду 12 руб. 35 коп.
Составьте программу, которая преобразует введенное с клавиатуры дробное число в денежный формат. Например, число 12,348 должно быть преобразовано к виду 12 руб. 35 коп.
Гость
Ответ(ы) на вопрос:
Гостьvar i:integer; j,n:real;
begin
write('Введите число: '); readln(n);
i:=trunc(n);
j:=round(frac(n)*100);
write(i,' руб. ',j, ' коп.');
end.
Не нашли ответ?
Похожие вопросы