- •Алфавит и словарь языка Паскаль
- •Правила написания идентификаторов:
- •Константы и переменные
- •Типы данных
- •Перечень типов данных в Турбо Паскале
- •Стандартные библиотечные модули
- •Примечание
- •Операторы
- •Простые операторы
- •Структурные операторы
- •Стандартные арифметические действия
- •Практическое занятие №2 процедуры ввода-вывода
- •Процедура чтения read
- •Процедура записи write
- •Практическое задание n2 3 Структурные операторы. Операторы условия.
- •Оператор условия If
- •Практическое задание № 4
- •Оператор повтора repeat
- •Практическое задание n9 6 Контрольная работа по Turbo Pascal 7.0
- •Практическое задание n2 7 Массивы
- •Поиск элемента в массиве
- •1: Write (‘ номер элемента массива, равного данному ’, I); 2: End.
- •Практическое задание n2 9 Таблицы
- •Вычисление суммы элементов главной диагонали квадратной таблицы.
- •Нахождение сумм элементов столбцов таблицы,
- •Процедуры без параметров
- •Var a, b: integer; {локальные переменные}
- •Наберите программу вычисления наименьшего общего кратного.
- •2.0Ператор безусловного перехода.
- •Рекурсии
- •Наберите программу вычисления факториала числа с использованием рекурсии.
- •7. Проем о:,
- •Практическое задание № 13 записи
- •Дан массив записей, содержащий сведения о работниках предприятия.
- •,J: integer; s: real; p: string [10]; begin { формирование массива записей }
- •Практическое задание n914 файлы Файл- это совокупность данных, записанная во внешней памяти под определенным именем.
- •Средства обработки файлов.
- •Открытие файла для операции запись производится оператором:
- •Открытие файла для чтения производится оператором: reset (f);
- •Чтение данных из файла осуществляется оператором: read (f, а);
- •Практическое задание № 15 Множества
- •Операции над множествами:
- •Наберите программу, определяющую количество гласных и согласных букв в
- •Управление экраном компьютера
- •Наберите программу, которая в разных текстовых режимах выводит текст, смещая его по диагонали и вставляет строку текста.
- •Наберите программу, которая выводит на экран окно с изменяющимся цветом фона и цветом текста.
- •Задачи для контрольной работы
- •Практическое задание № 8 Сортировка массива
- •Наберите программу сортировки массива методом пузырька:
- •Процедуры с параметрами
- •Управление звуком компьютера
- •2. Наберите программу, позволяющую произвести прсхггую музыкальную гамму.
Практическое занятие №2 процедуры ввода-вывода
Для выполнения операций ввода-вывода служат четыре процедуры:
Read, Readln, Write, Writeln
Процедура чтения read
Процедура чтения Read обеспечивает ввод числовых данных, символов, строк и т.д. для последующей их обработки программой.
Формат:
Read (Х1 ,Х2,.. .,Хп) или Read (FV,X1,X2,...,Xn),
гдеХ1,Х2,...Дп- переменные допустимых типов данных;
FV - переменная, связанная с файлом, откуда будет выполняться чтение.
Процедура чтения Readln аналогична процедуре Read. Единственное отличие заключается в том, что после считывания данные для следующей процедуры Readln будут начинаться с начала новой строки.
Процедура записи write
Процедура записи Write производит вывод числовых данных, символов, строк и булевских значений.
Формат:
Write (Y1,Y2,...,Yn) или
Write (FV,Y1,Y2,...,Yn), I
где Y1, Y2,..., Yn - выражения типа Integer, Byte, Real, Char, Boolean,
FV - имя файла, куда производится вывод.
Для вывода на принтер FV равно LST. Чтобы устройство LST стало доступным, необходимо подключить модуль Printer с помощью зарезервированного слова Uses (Uses Printer,).
В процедурах вывода Write и Writeln имеется возможность записи выражения, определяющего ширину поля вывода.
Оператор записи Writeln аналогичен процедуре Write, но после вывода последнего в списке значения для текущей процедуры Writeln происходит перевод курсора к началу следующей строки. Процедура Writeln, записанная без параметров, вызывает перевод строки.
Примером использования формата в процедуре Writeln может служить следующая программа АВС1 формирования таблицы.
Программа формирования таблицы
Запустите файл turbo.exe,
После запуска интегрированной среды программирования Turbo Pascal нажмите клавишу F10 и зайдите в главное меню (или Alt F).
Выберите меню File / New, нажмите Enter
На экране откроется окно редактирования. Введите следующий текст программы АВС1, нажимая клавишу Enter в конце каждой строки:
Program АВС1;
var А, В, D, Е, F: integer;
begin
А
В
D
Е
=
8;
=
4;
=
А + В; = А-В;
F: = А * В;
17 16
В: = 1; 30
Readln;
end.
Если компиляция прошла успешно, то нажав Enter клавишами Ctrl F9 запустите программу АВС1 на выполнение.
Для просмотра результатов выполнения нажмите клавиши Alt F5. Повторным нажатием клавиш Alt F5 вернитесь в среду Turbo Pascal.
Сохраните файл, для чего клавишей F10 перейдите в меню File/ Save as...
В открывшемся диалоговом окне запишите Е (F): \ abcl .pas.
Практическое задание n2 3 Структурные операторы. Операторы условия.
Условные операторы предназначены для выбора к исполнению одного из возможных действий (операторов) в зависимости от некоторого условия (при этом одно из действий может быть пустым, т.е. отсутствовать). В качестве условий выбора используется значение логического выражения. В Турбо Паскале имеются два условных оператора: If и Case
Если один оператор If может обеспечить выбор из двух альтернатив Истина и Ложь, то оператор Case позволяет сделать выбор из произвольного числа имеющихся вариантов.