pascalabcnet/TestSuite/question5.pas
Бондарев Иван 9489fd596e bug fix #750
2018-04-05 20:54:02 +02:00

6 lines
93 B
ObjectPascal

function f1 := 1;
function f2 := 0;
begin
var i := true ? f1 : f2;
assert(i = 1);
end.