Canon/open_set/28_unary_op.pas

7 lines
68 B
ObjectPascal
Raw Permalink Normal View History

2024-03-09 20:11:27 +08:00
program main;
var a: integer;
begin
a := 60;
write(not a);
end.