- •Язык программирования паскаль
- •Литература
- •1. Понятие о структурном программировании
- •1.1Особенности написания программ
- •1.2Алгоритм и его свойства
- •1.3Блок-схема
- •2.Общие сведения о языке программирования паскаль
- •2.1Название языка Паскаль
- •2.2Алфавит языка Паскаль
- •2.3Типы данных
- •2.4Перечисляемые типы данных
- •2.5Арифметические операции. Функции. Выражения
- •2.6Основные математические функции
- •2.7Структура программы
- •3.Текстовый режим работы в системе Паскаль
- •4.Основные операторы языка Паскаль.
- •4.1Оператор ввода данных с клавиатуры
- •4.2Оператор вывода данных на экран
- •4.3Оператор присваивания.
- •4.4Составной оператор и пустой оператор
- •4.5Оператор условного перехода
- •If условие then оператор;
- •4.6Оператор выбора варианта
- •4.7Оператор безусловного перехода
- •4.8Операторы цикла(повторения)
- •5.Массивы
- •6.Процедуры и функции
- •7.Строки
- •8.Особенности графики
- •8.1Переход в графический режим и возврат в текстовый
- •8.2Начало и окончание программы для работы с графикой:
- •8.3Рисование контурных геометрических изображений.
- •8.4Рисование закрашенных изображений.
- •8.5Вывод текста на графический экран
- •8.6Очитска экрана, тип и толщина линии
- •8.7Смещение в точки и смещение на вектор
- •8.8Иммитация движения
- •8.9Элементы мультипликации
- •8.10Построение графиков математических функций
- •8.11Работа с фрагментами изображения
- •8.12Управление видеостраницами
3.Текстовый режим работы в системе Паскаль
Для работы с экраном в текстовом режиме предназначен модуль crt, в котором используются готовые операторы предназначен целый ряд процедур, функций и переменных, который подключается с помощью команды uses crt, записанной сразу после заголовка программы.
Стандартные процедуры или функции модуля crt:
gotoxy (x,y) – перемещает курсор в строку x позиции y (x,y – целые);
clrscr – очистка экрана;
delay ( ) – задержка программы на миллисекунд ( – integer);
keypressed – функция, результат true – клавиша нажата, false – клавиша не нажата.
textcolor( с) – выбор текущего цвета букв ( с – номер цвета до 7);
textbackground (сf) – выбор цвета фона.
insline – вставляет пустую строку на месте расположения курсора;
delline – удаляет строку, в которой находится курсор и перемещает все расположенные;
clreol – очищает текущую строку до конца с позиции курсора
window (x1,y1,x2,y2) – отображает на экране окно в текстовом режиме, определяемое как текущее. Координаты окна х1,у1,х2,у2 всегда отсчитываются от левого верхнего угла экрана и должны удовлетворять следующим условиям:
1<=x1 < x2 <=Xmах;
1<=y1 < y2 <=Ymах.
Если эти условия не выполняются, то окно создано не будет. Для большинства видеоадаптеров Хmах=80, Ymах=25. Для адаптеров EGA и VGA специальными командами он может принимать еще 43 или 50.
После выполнения процедуры window окно становится текущим. Это значит, что все операции с экраном относятся к той его части, которая определена координатами х1,у1,х2,у2. При этом перемещение курсора происходит только в пределах текущего окна, и позиция с координатами (1,1) является левым верхним углом окна. Часть экрана вне окна становится недоступной для других процедур и функций. При завершении работы программы, использующей окна, происходит автоматическое восстановление параметров текстового режима.
Пример. Окно с тенью и вывод по диагонали 3 слов «информатика».
hjogram zz1;
uses crt;
BEGIN
textbackground(2);
clrscr;
window(10,4,60,18);
textbackground(0);
clrscr;
window(11,3,61,17);
textbackground(4);
clrscr;
gotoxy(1,1); writeln('информатика');
gotoxy(2,2); writeln('информатика');
gotoxy(3,3); writeln('информатика');
readln;
END.
4.Основные операторы языка Паскаль.
4.1Оператор ввода данных с клавиатуры
Для ввода информации с клавиатуры используется оператор (встроенная процедура) read. Формат:
read (список переменных);
readln( a,b,c);
Переменные перечисляются через запятую. После выполнения программа останавливается и ожидает ввода информации с клавиатуры. Ввод осуществляется набором чисел, разделенных пробелом, и заканчивается нажатием клавиши ввода. Необходимо отметить, что вводимое значение должно соответствовать типам переменных и смыслу программы.
var b:real; a:char; … read(a,b);.
Если у нас есть несколько команд read, разделенных другими командами, то во время выполнения первого оператора read можно ввести все переменные. Для остальных команд программа не останавливается.
В отличие от оператора read оператор readln после ввода всех указанных в операторе данных осуществляет переход к следующей строке.