Canon/open_set/11_subc.pas
2024-03-09 20:11:27 +08:00

8 lines
70 B
ObjectPascal

program main;
var
a: integer;
begin
a := 10;
write(a - 2);
end.