Question

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

Answer 1

var
    cost: integer;

begin
    readln(cost);
    writeln('Стоимость товара ',cost div 100,' руб. ',cost mod 100,' коп.');
end.