Напишите программу даны числа x,y получить большее и меньшее из двух

Не знаю, какой язык вы учите в школе, напишу на паскале
program max;
var
x, y: Integer;
begin
if x > y then writeln(IntToStr(x))
else writeln(IntToStr(y));
readln();
end;