pascalabcnet/TestSuite/formatter_tests/should/Program997.pas
Бондарев Иван 59c9b163c0 bug fix #785
2018-05-01 12:10:52 +02:00

29 lines
364 B
ObjectPascal

begin
Arr(0).ForEach(i -> begin
writeln(2, 3);
begin
writeln(2,
3,
4,
5);
writeln;
Arr(0).ForEach(i -> begin
sin(2);
end);
end;
writeln;
writeln;
end);
begin
ww;
end;
writeln(2,
sin(3,
2),
4);
writeln(2
+ 3
+ 4);
end.