pascalabcnet/TestSuite/question8.pas

8 lines
201 B
ObjectPascal
Raw Permalink Normal View History

2022-09-04 13:40:00 +03:00

begin
var i := new BigInteger(1);
var s := (if false then i else new BigInteger(2)).ToString;
assert(s = '2');
s := (if true then i else new BigInteger(2)).ToString;
assert(s = '1');
end.