pascalabcnet/TestSuite/question8.pas
Ivan Bondarev 749487e7a4 #2697
2022-09-04 12:40:00 +02:00

8 lines
201 B
ObjectPascal

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.