Div Mod

program divmod;
uses crt;
var a,b,x,y:integer;

begin
clrscr;
writeln('Add meg a szamokat!');
readln(a,b);

x:=a div b;
y:=a mod b;

writeln (x, ' ', y);
readln;
end.