Забор возле домика будет состоять из досочек-штакетинок:

У вас есть предложение?
Конечно, раз забор состоит из множества одинаковых фигурок, стоит создать процедуру и вызывать её для построения каждой досочки. Попробуем?
• Откройте файлpr5.pas.
• Добавьте объявление процедурыDoskaи её вызов в программе:

• Запустите программу — получилась досочка?

Теперь достаточно добавить второй вызов процедуры Doska, потом третий, четвёртый, пятый...— Погодите! — вырывается у вас — но ведь и вторая, и третья, и пятидесятая доски будут рисоваться на том же самом месте!
И действительно, мы создали процедуру, рисующую фигуру в абсолютных координатах. Такая процедура пригодна для рисования единственного экземпляра. Если же нам необходимо рисовать несколько одинаковых (или почти одинаковых) фигур, то рисование в процедуре должно производиться по относительным координатам.
— Как это? — спросите вы. А давайте попробуем.