var
  x: Integer;
  b: Boolean;

begin
  x := 1;
  b := (x > 0);
  case b of
    True: WriteLn('YES');
    False: WriteLn('NO');
  end;
end.