Canon/open_set/16_mod.pas

8 lines
72 B
ObjectPascal

program main;
var
a: integer;
begin
a := 10;
write(a div 3);
end.