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);
writeln(' X <= y =',x <= y);
writeln(' x = y =',x = y);
writeln(' x <> y =',x <> y);
writeln;
readln;
donewincrt;
end.