program operator_aritmatika;
uses WinCrt;
var
x,y:integer;
begin
write(' masukkan nilai x = ');readln(x);
write(' masukkan nilai y =');readln (y);
writeln;
writeln(' x + y = ',x + y);
writeln(' x - y = ',x - y);
writeln(' x / y = ',x / y:0:2);
writeln(' X div y =',x div y);
writeln(' x mod y =',x mod y);
readln;
donewincrt;
end.