Подключение модуля CRT происходит по команде: Uses Crt;
Cлайд 4
Минимальной единицей управления экраном в текстовом режиме работы является один символ.
Cлайд 5
ClrScr – очистка текущего окна, курсор помещается в верхний левый угол экрана. Экран закрашивается в чёрный цвет.
Cлайд 6
(1,1) (80,80)
Cлайд 7
Program Primer2; Begin Writeln(‘Мне нравится работать на компьютере’); Readln; End.
Cлайд 8
Program Primer2; Uses Crt; Begin ClrScr; Writeln(‘Мне нравится работать на компьютере’); Readln; End.
Cлайд 9
GotoXY(x,y) – перемещает курсор в позицию Х строки, Y экрана. 1,1 X y GotoXY(x,y);
Cлайд 10
Program Primer2; Uses Crt; Begin ClrScr; GotoXY(20,20); Writeln(‘Мне нравится работать на компьютере’); Readln; End.
Cлайд 11
Установка цвета фона экрана: TextBackGround(N) – задать цвета фона, N – код цвета от 0 до 7. ClrScr – очистка экрана цветом N.
Cлайд 12
Program Primer2; Uses Crt; Begin TextBackGround(2); ClrScr; GotoXY(20,20); Writeln(‘Мне нравится работать на компьютере’); Readln; End.
Cлайд 13
TextColor(N) – задание цвета выводимых на экран символов, N принимает значения от 0 до 15. N = 128 – код для получения мерцающего символа.
Cлайд 14
Program Primer2; Uses Crt; Begin TextBackGround(2); ClrScr; GotoXY(20,20); TextColor(5); Writeln(‘Мне нравится работать на компьютере’); Readln; End.
Cлайд 15
Window(x1, y1, x2,y2) Вывод на экран окна. Где x1, y1 – координаты левого верхнего угла окна, x2, y2 – координаты правого нижнего угла.
Cлайд 16
X1 Х2 Y1 xxxfgfg fffgghkgjhkglnbt Y2 X1 X2
Cлайд 17
Program Primer2; Uses Crt; Begin TextBackGround(2); ClrScr; Window(13, 25, 66, 45); TextBackGround(3); ClrScr; GotoXY(10,10); TextColor(5); Writeln(‘Мне нравится работать на компьютере’); Readln; End.
Cлайд 18
Управление звуком Sound(i) - активизирует звуковые средства ПК. I – частота звучания в Герцах. NoSound – отменяет звуковой режим. Delay(r) – приостанавливает работу программы на указанное число r миллисекунд.
Cлайд 19
Program Primer2; Uses Crt; Begin TextBackGround(2); ClrScr; Window(13, 25, 66, 45); TextBackGround(3); ClrScr; GotoXY(10,10); TextColor(5); Writeln(‘Мне нравится работать на компьютере’); Sound(500); Delay(1000); NoSound; Readln; End.
Cлайд 20
Электронная физминутка для глаз
Cлайд 21
Cлайд 22
Практическая работа Составить программу для вывода сообщения о себе (фамилия, имя) в окне. Окно расположено в верхнем левом углу экрана. Цвета фона и текста, расположение слов в окне выбрать самостоятельно.
Cлайд 23
Домашнее задание 1. Подготовиться к опросу по записям в тетради(выучить процедуры модуля и их назначение); 2. Выполнить задание на карточке.