pascalabcnet/TestSuite/question1.pas

7 lines
94 B
ObjectPascal
Raw Normal View History

2015-05-14 22:35:07 +03:00
begin
var y := 2;
var x := (y<1)?3:4;
assert(x=4);
x := (y>1)?3:4;
assert(x=3);
end.