pascalabcnet/TestSuite/arithm13.pas

4 lines
76 B
ObjectPascal
Raw Permalink Normal View History

2023-07-30 12:24:14 +03:00
begin
var a: longword := 2000000000;
assert(a * 2 = 4000000000);
end.