pascalabcnet/TestSuite/arithm13.pas
2023-07-30 11:24:14 +02:00

4 lines
76 B
ObjectPascal

begin
var a: longword := 2000000000;
assert(a * 2 = 4000000000);
end.