Использование подпрограмм при составлении и реализации алгоритмов для компьютерного исполнителя

 ПРЕЗЕНТАЦИЯ К УРОКУ

ПРАКТИЧЕСКАЯ РАБОТА

Задание 1. Запускаем программу PascalABC.NET. Ярлык вы найдёте на Рабочем столе или в меню Пуск Обратите внимание на чёрные буквы net в правом нижнем углу значка

Задание 2. Набрать и выполнить программу, над которой сегодня работали вместе. Для выполнения программы можно нажать клавишу F9.

uses robot;

 ... z;

 begin

  paint; down; paint; right;

  paint; up; paint;

 end;

 procedure p;

 begin

  right; right;

 end;

begin

 field(8,2);

 left;left;left;...;

 up;

 z;p;

...

end.

Задание 3. Измените программу так, чтобы Робот закрашивал 5 таких квадратов. 

1.  Вам надо изменить ширину поля: добавиться 2 квадрата шириной по 2 клеточки и 2 прохода ашириной в одну клетку, т. е. 8+2*2+2=14 клеток.

2. Изменится начальное положение Робота, ему надо пойти 7 раз влево, а не 4. 

....

begin

 field(14,2);

 left;

 left;

 left;

 left;

 left;

 left;

...

3. Добавить процедуры закраски и перехода. Перед end. надо добавить их имена.

Задание 4. Составьте узор для шахматной доски. Берём одну линию высотой в 2 клеточки.

Задание 5. Получить полную шахматную доску.