pascalabcnet/TestSuite/TupleVar2Assign.pas

5 lines
85 B
ObjectPascal
Raw Normal View History

2017-06-01 13:14:49 +03:00
begin
var (a, b) := (1,1);
assert((a=1) and (b=1));
assert((a,b) = (1,1));
end.