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

Ник0090 Ник0090    3   08.07.2019 12:20    0

Ответы
sahin123321 sahin123321  31.07.2020 09:18
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.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика