Pascal ABC

 

ГЛАВНАЯ
УСТАНОВКА
ОКНО ПРОГРАММЫ
ЛИНЕЙНЫЕ АЛГОРИТМЫ
ЧЕРТЁЖНИК
GraphABC
    РОБОТ
АЛГОРИТМЫ С ВЕТВЛЕНИЯМИ
АЛГОРИТМЫ С ПОВТОРЕНИЯМИ
ПРОЦЕДУРЫ И ФУНКЦИИ
ТЕСТЫ
ТВОРЧЕСКИЕ РАБОТЫ
ОЛИМПИАДНЫЕ ЗАДАНИЯ
 
 

 

 

 

 

ЧЕРТЕЖНИК ◊

Исполнитель Чертежник   Линейные алгоритмы Составление линейных алгоритмов. Команда OnVector(a,b) Сохранение, загрузка алгоритмов Составление, редактирование и выполнение  алгоритмов

Составление линейных алгоритмов. Команда OnVector(a,b)

Алгоритмы, в которых команды выполняются последовательно одна за другой, в порядке их записи, называются линейными.

 

  Пример 1. Написать алгоритм получения изображения двузначного числа  с помощью исполнителя Чертежник.

Решение:

Выберем следующий алгоритм построения изображения:

1) создать поле для исполнителя Чертежник размером 6х5 (6 клеток по горизонтали, 5 клеток по вертикали);

2) сместиться в точку (2, 2);

3) опустить перо;

4) изобразить цифру 1;

5) поднять перо и смечтиться в точку (4,3);

6) опустить перо;

7) изобразить цифру 2;

8) поднять перо и перейти в начало координат.

 

Вначале запишем алгоритм решения задачи на русском языке. Затем для каждой команды этого алгоритма выберем соответствующую команду исполнителя Чертежник.
Запись алгоритма на русском языке Текст программы

Заголовок программы;

Program PR_1;

вызов исп. Чертежник;

uses Drawman;

начало программы;

begin

создание поля размером 6х5;

Field(6,5);

рисуем цифры 1 и 2;

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.

Можешь загрузить!       Пример 1

Для выполнения программы выберем команды ПрограммаàВыполнить (F9 или кнопка на панели инструментов). Откроется окно исполнителя Чертежник, где нужно нажать кнопку Пуск или клавишу Enter на клавиатуре.

Команда OnVector(a,b)

OnVector(a,b)– перемещает перо Чертежника на вектор (a,b).

Выполним пример 1, но вместо команды ToPoint(x,y),  кторая перемещает перо Чертежника в точку (x,y). будем использовать OnVector(a,b).

Перемещение из точки (1,2) в точку (3,3) с помощью вектора: OnVector(2,1).

Перемещение из точки (3,3) в точку  (1,2) с помощью вектора: OnVector(-2,-1).

Перемещение из точки (1,3) в точку  (4,3) с помощью вектора: OnVector(3,0).

Перемещение из точки (4,3) в точку (1,3)  с помощью вектора: OnVector(-3,0).

Перемещение из точки (3,2) в точку (3,5)  с помощью вектора: OnVector(0,3).

Перемещение из точки (3,5) в точку (3,2)  с помощью вектора: OnVector(0,-3).

 

  Пример 2. Написать алгоритм получения изображения двузначного числа  с помощью исполнителя Чертежник, используя команду OnVector(a,b).

Решение:

Program PR_2 ;

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.

Можешь загрузить!       Пример 2

  Пример 3. Написать алгоритм получения изображения четырехзначного числа  с повторяющимися цифрами с помощью исполнителя Чертежник, используя команду OnVector(a,b).

Решение:

Program PR_1212 ;

uses Drawman;

begin

Field(16,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(1,1);

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;

end.

Можешь загрузить!       Пример 3

Задачи для самостоятельного решения

Составьте программы для получения следующих изображений  с помощью исполнителя Чертежник и выполните их в системе программирования Pascal ABC:

1)

 

2)

 

3)

 

 

СЕРВИС 

Copyright © 2008 СОШ №2 им. Н.П. Массонова г.Свислочь © Синица А.А.