pascalabcnet/TestSuite/formatter_tests/input/Program997.pas
Бондарев Иван 924a625e45 bug fix #605
2017-12-10 14:43:39 +01:00

29 lines
312 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.