Question

Напишите код программы с помощью операторов Паскаля

Answer 1

Var x,y,z:integer;
begin
  x:=5;
  y:=-6;
  if x>y then z:=x+y else z:=y-x;
  Writeln(z);
end.