求商和求余

program e999;
var
　　c, f: integer;
begin
　　read(c, f);
　　writeln(c, ' div ', f, ' = ', c div f);
　　writeln(c, ' mod ', f, ' = ', c mod f);
end.