var i : integer; begin for i := 1 to 10 do { 1} begin begin begin begin { 5} begin begin begin begin begin {10} begin begin begin begin begin {15} begin begin begin begin begin {20} begin begin begin begin begin {25} begin begin begin begin begin {30} begin begin begin begin begin {35} begin begin begin begin begin {40} begin begin begin begin begin {45} begin begin begin {48} begin { ... } end; end; end; end; end; end; end; end; end; end; end; end; end; end; end; end; end; end; end; end; end; end; end; end; end; end; end; end; end; end; end; end; end; end; end; end; end; end; end; end; end; end; end; end; end; end; end; end; end.