2 Приведем пример использования описанных выше процедур.
#
ПРОГРАММИРОВАНИЕ ОЗВУЧЕННЫХ ДИНАМИЧЕСКИХ СЦЕН
* function ReadKey:char;
Считывает символ с клавиатуры не отображая его на экран. Если
перед обращением к данной функции функция KeyPressed имела значение
true , то символ считывается немедленно, в пртивном случае функция
ожидает нажатия клавиши.
Обычные алфавитно-цифровые клавиши возвращают однобайтные коды
в стандарте ASCII. Специальные клавиши (управление курсором, Alt,
Ctrl и т.п. при нажатии возвращают расширение, двухбайтные коды
ASCII. При нажатии специальной клавиши функция возвращает сначала
нулевой символ null,а затем расширенный код клавиши.
Нулевые символы не могут быть получены никаким другим путем.
Этим обеспечивается то, что следующим символом будет расширенный код
клавиши.
В качестве расширения стандарт языка разрешает вставлять в
строку символов управляющие символы, например #.
Приведем фрагмент программы, в котором в переменную с именем Ch
считывается символ или расширенный код клавиши и для переменой
FuncKey булевского типа устанавливается значение true, если символ
является кодом специальной клавиши:
......
Ch:=ReadKey;
If Ch<> # then FuncKey:=False
else
begin
FuncKey:=true;
Ch:=ReadKey
end;
......
ПРОГРАММИРОВАНИЕ ОЗВУЧЕННЫХ ДИНАМИЧЕСКИХ СЦЕН
* procedure SetWriteMode(WriteMode:integer);
Устанавливает режим записи при вычерчивании линий с помощью
процедур формирования прямолинейных изображений (кроме процедуры
Bar3D). Процедура описана в модуле Craph. Параметр может принимать
следующие значения:
CopyPut = 0 - простое замещение - вычерчиваемая линия "затирает" то,
что было на экране.
XORPut = 1 - сложение по mod 2 - обеспечивается комбинирование вы-
водимой линии с экранным изображе-
нием на основе выполнения поточеч-
ной поразрядной операции суммиро-
вания по модулю2.
Важно, что два одинаковых вывода на экран в режиме XORPut при-
ведут сначала к стиранию линии на экране, а затем в восстановлению
исходного экранного изображения.
0
01КАКОВЫ ФУНКЦИИ ПРОЦЕДУРЫ ImageSize?
1 Создание новой динамической переменной.
2 Сохранение в динамической памяти растрового образа заданной прямоугольной области экрана.
3 Возвращение числа байт, необходимых для сохранения прямоугольной области экранного изображения.
4 Вывод в заданное место экрана хранимого в динамической памяти растрового изображения.
*
02КАКОЕ СУЩЕСТВУЕТ ОГРАНИЧЕНИЕ ПО ПЛОЩАДИ СОХРАНЯЕМЫХ В ДИНАМИЧЕСКОЙ ПАМЯТИ ОБЛАСТЕЙ ЭКРАНА?
1 Ограничений нет.
2 Не более одного экрана.
3 Не более 1/2 экрана.
4 Не более 1/4 экрана.
*
ОЗТРЕБУЕТСЯ ЛИ КОНТРОЛИРОВАТЬ РАЗМЕР СВОБОДНОЙ ДИНАМИЧЕСКОЙ ПАМЯТИ?
1 Да. С помощью функции MaxAvail.
2 Да. С помощью процедуры GetMem.
3 Нет, не требуется. Размер динамической памяти не ограничен.
4 Да, требуется. Контроль осуществляется с помощью процедуры Dispose.
*
04КАКОГО ЦВЕТА БУДЕТ ВЫВЕДЕНО ИЗОБРАЖЕНИЕ ТОЧКИ НА ЭКРАНЕ, ЕСЛИ ТОЧКУ КРАСНОГО (4) ЦВЕТА ЗАМЕСТИТЬ С ПОМОЩЬЮ ПРОЦЕДУРЫ Putlmage (X,Y,p~,XORPut) точкой синего (1) цвета?
1 Черного (0).
2 Светло-бирюзового(11).
3 Красного (4).
4 Малиновый(5).
*
05КАКУЮ ОРГАНИЗАЦИЮ ВИДЕОБУФЕРА ПОДДЕРЖИВАЮТ ЛАБОРАТОРНЫЕ КОМПЬЮТЕРЫ IBM PC С АДАПТЕРОМ EGA ПРИ ИСПОЛЬЗОВАНИИ ЯЗЫКА TURBO-PASCAL?
1 Одностраничную.
2 Двухстраничную.
3 Трехстраничную.
4 Четырехстраничную.
*
06С ПОМОЩЬЮ КАКОЙ ПРОЦЕДУРЫ УСТАНАВЛИВАЕТСЯ СТРАНИЦА ВИДЕОБУФЕРА, НА КОТОРУЮ НАПРАВЛЯЕТСЯ ПОСЛЕДУЮЩИЙ ГРАФИЧЕСКИЙ ВЫВОД?
1 SetVisualActivePage
2 SetWriteMode
3 Dispose
4 SetActivePage
*
07КАКОВЫ ФУНКЦИИ ПРОЦЕДУРЫ SetWriteMode?
1 Считывание символа с клавиатуры не отображая его на экран.
2 Установка режима записи при вычерчивании линий с помощью процедур формирования прямолинейных изображений.
3 Устанавливает номер страницы видеобуфера, на которую осуществляется последующий графический вывод.
4 устанавливает номер визуализируемой страницы видеобуфера.
*
О
011Ответ неверный. Эту функцию осуществляет процедура GetMem. 002
*
2Ответ неверный. Эту функцию осуществляет процедура GetImage. 002
*
3Ответ правильный. 005
*
4Ответ неверный. Эту функцию осуществляет процедура PutImage. 002
*
*
021Ответ неверный. Объем памяти, необходимый для сохраненеия области 002 экрана, не должен быть равен или превышать 64К, что соответствует 1/2 площади экрана.
*
2Ответ неверный. Объем памяти, необходимый для сохраненеия области 002 экрана, не должен быть равен или превышать 64К, что соответствует 1/2 площади экрана.
*
3Ответ правильный. 005
*
4Ответ неверный. Объем памяти, необходимый для сохраненеия области 002 экрана, не должен быть равен или превышать 64К, что соответствует 1/2 площади экрана.
*
*
031Ответ првильный. Функция MaxAvail возвращает наибольший непрерывный 005 свободный блок, имеющийся в динамической области памяти в текущий момент.
*
2Ответ неверный. Контроль требуется, однако, процедура GetMem 003 выполняет другие функции.
*
3Ответ неверный. Если в динамической области недостаточно места для 002 размещения новой переменной, возникает ошибка времени выполнения программы. Чтобы этого избежать следует пользоваться функцией MaxAvail, которая возвращает размер наибольшего непрерывного свободного блока динамической области памяти.
*
4Ответ неверный. контроль требуется, но с помощью функции MaxAvail. 003
*
*
041Ответ неверный. При использовании в качестве значения параметра 002 BitBlt константы XORPut коды цветов точек складываются по модулю 2:
4(10) + 1(10) = 0100(2) + 0001(2) = 0101(2) = 5(10)
*
2Ответ неверный. При использовании в качестве значения параметра 002
BitBlt константы XORPut коды цветов точек складываются по модулю 2:
4(10) + 1(10) = 0100(2) + 0001(2) = 0101(2) = 5(10)
*
3Ответ неверный. При использовании в качестве значения параметра 002 BitBlt константы XORPut коды цветов точек складываются по модулю 2:
4(10) + 1(10) = 0100(2) + 0001(2) = 0101(2) = 5(10)
*
4Ответ правильный. 005
*
*
051Ответ неверный. Эти компьютеры имеют двухстраничную организацию 002 видеобуфера.
*
2Ответ правильный. 005
*
3Ответ неверный. Эти компьютеры имеют двухстраничную организацию 002 видеобуфера.
*
4Ответ неверный. Эти компьютеры имеют двухстраничную организацию 002 видеобуфера.
*
*
061Ответ неверный. процедура SetVisualPage задает номер отображаемой на 002 экран дисплейной страницы видеобуфера.
*
2Ответ неверный. Процедура SetWriteMode выполняет другие функции. 002
*
3Ответ неверный. Процедура Dispose выполняет другие функции. 002
*
4Ответ правильный. 005
*
*
071Ответ неверный. Процедура SetWriteMode устанавливает режим записи 002 при вычерчивании линий с помощью процедур формирования прямоугольных изображений.
*
2Ответ правильный. 005
*
3Ответ неверный. Процедура SetWriteMode устанавливает режим записи 002 при вычерчивании линий с помощью процедур формирования прямоугольных изображений.
*
4Ответ неверный. Процедура SetWriteMode устанавливает режим записи 002 при вычерчивании линий с помощью процедур формирования прямоугольных изображений.
*
*
0
Приложение 3
Экранные формы
... набор процедур и функций языков программирования Basic и Pascal, позволяют управлять графическим режимом работы экрана, создавать разнооборазные графические изображения и выводить на экран текстовые надписи. ГЛАВА 2. ГРАФИЧЕСКИЕ ВОЗМОЖНОСТИ ЯЗЫКА ПРОГРАММИРОВАНИЯ В КУРСЕ ИНФОРМАТИКИ БАЗОВОЙ ШКОЛЫ (НА ПРИМЕРЕ BASIC И PASCAL) 2.1 Разработка мультимедиа курса «Графические возможности языков ...
... деятельности во внешней речи про себя и этап выполнения деятельности в форме внутренней речи. Данные характеристики деятельности и этапы ее становления и определяют требования к составлению обучающих программ. 2. При оценке авторской технологии проверяйте ее на соответствие признакам педагогической (методической) технологии Классификационные параметры технологии По уровню применения: ...
... программирования Турбо Паскаль. Диалог между компьютером и играющим осуществляется как в меню, так и во время самой игры. 2. СПЕЦИФИКАЦИЯ ИГРОВОЙ ПРОГРАММЫ «SIEGE» 1. Название задачи Компьютерная игра. Название программы – «Siege». Система программирования Turbo Pascal. 2. Описание Игра начинается с заставки, где написано название игры. Затем следует главное меню, где ...
... следует курсор установит на отметку “Exit” и нажат клавишу <Enter>. 14. Для повторения работы необходимо выполнить последовательно пункты с 4-го по 13-й. §2.3 Текст анимационно-обучающей программы механической системы Program Water_Program; Uses Crt, Graph; Const { Vvod Unit Graphics } FunWeb='c:tpBgi'; Var Gd,Gm,I,X,Y,X1,Y1,XX,YY,Rad,J:Integer; Z,J1,J2,W,V,G:Integer; ...
0 комментариев