Цель урока: познакомиться с командой OnVector (a,b) и научиться использовать ее при составлении программ для исполнителя Чертежник.
Система команд исполнителя Чертежник
| Field(n,m) | Создать поле размером n x m |
| PenDown | Опускает перо Чертежника |
| PenUp | Поднимает перо Чертежника |
| ToPoint(x,y) | Перемещает перо Чертежника в точку (x, y) |
| OnVector(a,b) | Перемещает перо Чертежника на вектор (a, b) (т.е. на а единиц по оси Ох и на b единиц по оси Оу относительно текущей точки) |
Команда OnVector(a,b) перемещает перо Чертежника на a единиц по оси Ох и на b единиц по оси Оy относительно текущего состояния.
- Если a=0, то перо по оси Ох не смещается.
- Если b=0, то перо по оси Оу не смещается.
- Если a>0 и b=0, перо смещается вправо.
- Если a<0 и b=0, перо смещается влево.
- Если b>0 и a=0 перо смещается вверх.
- Если b<0 и a=0, перо смещается вниз.
Например, если перо Чертежника находится в точке А(1, 2), то для перемещения в точку В(4, 4) можно выполнить команду OnVector (3, 2).
Рассмотрим пример
Текст программы с использованием команды ToPoint()
uses Drawman;
begin
Field(6, 5);
ToPoint(2, 2);
PenDown;
ToPoint(3, 3);
ToPoint(3, 1);
PenUp;
ToPoint(4, 3);
PenDown;
ToPoint(5, 3);
ToPoint(5, 2);
ToPoint(4, 1);
ToPoint(5, 1);
PenUp;
ToPoint(0, 0);
end.Текст программы с использованием команды OnVectort()
uses Drawman;
begin
Field(6, 5);
OnVector(2, 2);
PenDown;
OnVector(1, 1);
OnVector(0, -2);
PenUp;
OnVector(1, 2);
PenDown;
OnVector(1, 0);
OnVector(0, -1);
OnVector(-1, -1);
OnVector(1, 0);
PenUp;
OnVector(-5, -1);
end.Результат работы программы
Задания по теме урока
Задание 1. Вставьте пропущенные координаты в алгоритме рисования треугольника с помощью команды OnVector(a,b)
Program treugolnik;
uses Drawman;
begin
Field(6, 5);
ToPoint(1,3);
PenDown;
OnVector( , );
OnVector( , );
OnVector( , );
PenUp;
OnVector( , );
end.
Задание 2. В системе программирования PascalABC.NET составьте программы создания следующих изображений с использованием команды OnVector (a, b).
Вариант 1
Вариант 2
Задание 3. Постройте на координатной плоскости объект, создаваемый следующей программой:
Дополнительное задание. В системе программирования PascalABC.NET составьте программу создания изображения с использованием команды OnVector (a, b).
