PASCAL Исполнитель Чертежник © Бакунович А.В. 1

Диск D \ Public\ PascalABC.NET\ PascalABCNET Запуск программы 2

Исполнитель Чертежник Исполнитель Чертежник предназначен для построения рисунков и чертежей на плоскости с координатами. Чертежник имеет перо, которое он может поднимать, опускать и перемещать. При перемещении опущенного пера за ним остается след. 3

Исполнитель Чертежник Исполнитель Чертежник и поле, на котором он работает, отображаются на экране следующим образом: 4

Команды Чертежника Команды исполнителя Чертежник содержатся в модуле Drawman: ToPoint(x,y) – перемещает перо Чертежника в точку (x,y); OnVector(a,b)– перемещает перо Чертежника на вектор (a,b); PenUp – поднимает перо Чертежника; PenDown – опускает перо Чертежника. 5

Программа Простейшая программа для Чертежника, рисующая отрезок с концами в точках (0,0) и (1,1): uses Drawman; begin field (6,6); PenDown; ToPoint (1,1); end. или F9 6

Программа Предложение uses Drawman; означает, что в программе будут использоваться команды Чертежника. Слово begin обозначает начало списка команд, Слово end, после которой стоит точка, обозначает конец программы. После каждой команды ставиться точка с запятой. В записи команды числа отделяются друг от друга запятыми. 7

Исполнитель Чертежник процедура Field (N,M) – задает размер поля (N – размер клеток по ширине, М – по высоте) процедура StandardField (без параметров) – задает размер поля 20 x 30. 8

Оператор цикла for Оператор цикла for имеет одну из двух форм: for переменная := начальное значение to конечное значение do оператор или for переменная := начальное значение downto конечное значение do оператор 9

Оператор цикла for Например, следующая программа выведет на экран последовательность чисел Var I : integer; Begin For i := 1 to 5 do Write (i, ); End. 10

Написать программу выводящую данный рисунок 11