Недавнее содержимое от sem1234

Требуется помощь в создании комментариев в листинге uses ABCObjects, GraphABC; var pole: array [,] of ObjectABC; hod: char := 'X'; ok: ObjectABC; test:integer; const vin = 5; procedure picture(n, m: integer); var i, j: integer; begin for i := 0 to m - 1 do for j := 0 to n...