// Условный оператор. Полная форма
var
x: integer := 5;
y: integer := 3;
begin
if x<y then
writeln(x,'<',y)
else writeln(y,'<',x);
end.
