Bazius 24 октября 2019 в 04:43

Паскаль! Пожалуйста!

Var
    cost: integer;

begin
    readln(cost);
    writeln(Стоимость товара ,cost div 100, руб. ,cost mod 100, коп.);
end.
Для комментирования необходимо зарегистрироваться на сайте