PASCAL Исполнитель Чертежник © Бакунович А.В. 1. Диск D \ Public\ PascalABC.NET\ PascalABCNET Запуск программы 2. - презентация

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

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

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

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

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

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

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

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

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

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

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