Как сделать робота в паскале абс
Добавил пользователь Дмитрий К. Обновлено: 04.10.2024
Исполнитель – это устройство, способное выполнять определенный набор команд. Обычно с исполнителем связано некоторое поле, на котором он работает. Традиционно исполнители используются для быстрого обучения основным конструкциям языка программирования. В Pascal ABC реализованы исполнитель Робот и Чертежник. Исполнитель Робот действует на прямоугольном клеточном поле. Между некоторыми клетками, а также по периметру поля находятся стены. Основная цель Робота – закрасить указанные клетки и переместиться в конечную клетку.
Для данного исполнителя существуют стандартные задания, а также можно создавать новые с помощью модуля RobotMake. Для этого необходимо изменить файл RobTasks.pas, который находится в каталоге C:\Program Files\PABC\UNITS\Tasks на этот файл с кодом задания.
На основе незначительного изменения программы генерации лабиринта MazeGen.pas, файл с которой находится в каталоге C:\PABCWork\SAMPLES\Projects\Labyrinth мы создали задание для исполнителя Робот – найти выход из лабиринта.
Для вызова задания замените файл RobTasks.pas на Вашем компьютере. Для вызова задания используйте код:
uses Robot, RobTasks;
begin
Task('MyRob4');
end.
Окно задания выглядит так:
Необходимо попасть на закрашенную клетку – это выход из лабиринта. В следующий раз мы рассмотрим программу прохождения этого лабиринта для исполнителя Робот. А пока предлагайте Ваши варианты.
Добрый день ! Пришла пора показать, что там у нас вышло. Вот программа.
uses Robot, RobTasks;
var i: integer;
begin
Task('MyRob4');
while CellIsFree = true do
begin
R_Right: if FreeFromRight = true then Right
else goto R_Down;
end.
Я нарисовал но нет сканера и камеры ТОЛЬКО ТАПОК. Так что схематично в Paint сделал,
johnsilver Просветленный (21988) ну так ректанглы рисуй там где прямоугольнички. не вижу в чем проблема, если смог САМ нарисовать то, что нарисовал
Мы постоянно добавляем новый функционал в основной интерфейс проекта. К сожалению, старые браузеры не в состоянии качественно работать с современными программными продуктами. Для корректной работы используйте последние версии браузеров Chrome, Mozilla Firefox, Opera, Microsoft Edge или установите браузер Atom.
После запуска PascalABC, по умолчанию, запускается текстовый режим. Для работы с графикой служит отдельное графическое окно.
Чтобы его открыть, необходимо подключить модуль GraphABC. В этом модуле содержится набор процедур и функций, предназначенных для работы с графическим экраном, а также некоторые встроенные константы и переменные, которые могут быть использованы в программах с графикой.
С их помощью можно создавать разнообразные графические изображения и сопровождать их текстовыми надписями.
Подключение осуществляется в разделе описаний.
Формат подключения модуля GraphABC:Uses GraphABC;
Графический экран PascalABC (по умолчанию) содержит 640 точек по горизонтали и 400 точек по вертикали. Начало отсчета – левый верхний угол экрана. Ось x направлена вправо, а ось y –вниз. Координаты исчисляются в пикселях.
Все команды библиотеки GraphABC являются подпрограммами и описаны в виде процедур и функций. Для того, что бы команда выполнилась необходимо указать команду и задать значения параметров.
Управление графическим окном
После запуска PascalABC, по умолчанию, запускается текстовый режим. Для работы с графикой служит отдельное графическое окно.
Чтобы его открыть, необходимо подключить модуль GraphABC. В этом модуле содержится набор процедур и функций, предназначенных для работы с графическим экраном, а также некоторые встроенные константы и переменные, которые могут быть использованы в программах с графикой.
С их помощью можно создавать разнообразные графические изображения и сопровождать их текстовыми надписями.
Подключение осуществляется в разделе описаний.
Формат подключения модуля GraphABC:Uses GraphABC;
Графический экран PascalABC (по умолчанию) содержит 640 точек по горизонтали и 400 точек по вертикали. Начало отсчета – левый верхний угол экрана. Ось x направлена вправо, а ось y –вниз. Координаты исчисляются в пикселях.
Все команды библиотеки GraphABC являются подпрограммами и описаны в виде процедур и функций. Для того, что бы команда выполнилась необходимо указать команду и задать значения параметров.
Процедуры рисования графических примитивов
Процедуры, используемые для работы с цветом
Процедуры для работы с текстом
Цвета в PascalABC
Пример графической программы, рисующей изображение дома:
Программа, рисующая фигурку:
Практическая работа за компьютером
Задание 1. Определите координаты и составьте программу, выводящую на экран рисунок дома и дерева.
Программа будет иметь вид:
Задание 2. Используя оператор цикла и введя переменную для пересчета координат по оси x, постройте “поселок”, состоящий из 5 домов. Внесите соответствующие дополнения и изменения в предыдущую программу.
Выберем в качестве параметра цикла целочисленную переменную X.
Для всех элементов нашего рисунка абсолютное значение координаты X заменим на относительное. Например, для стены дома процедура для рисования запишется следующим образом:
Опишем последовательность создания группы заданий для исполнителя Робот. Создадим модуль RobTasks. pas со следующи м текстом: unit RobTasks; interface uses RobotMake; implementation procedure.
Описание
Только что добавленные документы
Спустя десятилетия после смерти короля рок-н-ролла его пластинки продолжают продаваться миллионными тиражами, что навело организаторов экспозиции, посвященной Элвису Пресли, на мысль познакомить.. .
Фильм о том, как ученые из Научного Универсального Института Необычных Услуг, или коротко - НУИНУ, создают волшебную палочку. Картина пропитана искрометным юмором и всевозможными.. .
Молодая австралийка Рут Бэррон, побывавшая в Индии и очарованная этой страной, решила жить по ее законам и обычаям. Обеспокоенная семья, исчерпав все способы воздействия.. .
Колебания дневного графика показывает самое крупное движение в этот день в течение интервала времени от полуночи до 3 PM GMT с кратким анализом особенно резких движений. График колебаний рынка.. .
Португалия встречает Тройку правительственным кризисом [Political deadlock in Portugal over bailout terms]
Не успело правительство Португалии объявить о завершении политического кризиса, как он грозит разгореться с новой силой. Оппозиционная социалистическая партия потребовала пересмотреть условия.. .
Натали Макдональд: правительство США снова работает и страна пытается снова опять в строй. Какое будущее ожидает главных торговых партнеров США, страны Латинской Америки? Со мной на связи доктор.. .
Читайте также: