Программа паскаль

Ввести число, определяющее стоимость покупки (например 123, 50). Вывести строку, определяющую стоимость с использованием текста (123 руб. 50 копеек).

Question

Информатика

Вениамин

14 августа, 05:30

Программа паскаль

Ввести число, определяющее стоимость покупки (например 123, 50). Вывести строку, определяющую стоимость с использованием текста (123 руб. 50 копеек).

+4

Ответы (1)

Знаете ответ?

Ромася · Answer 1

Var s, d, v:string; n, m:integer;

begin

Read (s) ;

n:=length (s) ;

m:=pos ('.', s) ;

d:=copy (s, 1, m-1) ;

v:=copy (s, m+1, n) ;

write (d,' руб. ', v, ' копеек') ;

end.

Программа паскальВвести число, определяющее стоимость покупки (например 123, 50). Вывести строку, определяющую стоимость с использованием текста (123 руб. 50 копеек).

Программа паскаль

Ввести число, определяющее стоимость покупки (например 123, 50). Вывести строку, определяющую стоимость с использованием текста (123 руб. 50 копеек).