- •Министерство образования Российской Федерации Ярославский государственный педагогический университет имени к.Д. Ушинского Лабораторный практикум по языку программирования Pascal Ярославль 2004
- •Оглавление
- •Лабораторные работы Лабораторная работа №1Знакомство с клавиатурой. Организация работы в среде Турбопаскаль.
- •Задание 1
- •Задание 2
- •Задание 3
- •Задание 4
- •Задание 5
- •Лабораторная работа №2Команды присваивания, ввода и вывода. Составление простейших программ на языке Турбопаскаль.
- •Задание 1
- •Задание 2
- •Задание 3
- •Задание 4
- •Задание 5
- •Лабораторная работа №3Команды ветвления и выбора на языке Турбопаскаль
- •Задание 1
- •Задание 2
- •Задание 3
- •Задание 4
- •Задание 5
- •Лабораторная работа №4Команды ветвления и повторения на языке Паскаль
- •Задание 1
- •Задание 2
- •Задание 3
- •Задание 3
- •Задание 4
- •Задание 5
- •Лабораторная работа №6Циклы
- •Задание 1
- •Задание 2
- •Задание 3
- •Задание 4
- •Задание 5
- •Дополнительные задания
- •Лабораторная работа №7Одномерные массивы
- •Задание 1
- •Задание 2
- •Задание 3
- •Задание 4
- •Задание 5
- •Дополнительные задачи.
- •Лабораторная работа №8Двумерные массивы
- •Задание 1
- •Задание 2
- •Задание 3
- •Задание 4
- •Задание 5
- •Дополнительные задачи.
- •Лабораторная работа №9Работа со строковыми величинами
- •Задание 1
- •Задание 2
- •Задание 3
- •Задание 4
- •Задание 5
- •Дополнительные задания
- •Лабораторная работа №10Обработка литерных величин на языке Турбопаскаль
- •Дополнительные задания
- •Задание 5
- •Лабораторная работа №12Работа с одномерными и двумерными массивами
- •Задание 1
- •Задание 2
- •Лабораторная работа №13Многочлены
- •Задание 1
- •Задание 2
- •Задание 3
- •Задание 4
- •Задание 5
- •Лабораторная работа №14Линейная комбинация векторов
- •Задание 1
- •Задания повышенной трудности
- •Лабораторная работа №15Скалярное произведение векторов.
- •Лабораторная работа №16 Простейшие графические операторы
- •Задание 5
- •Задание 6
- •Дополнительные задания.
- •Лабораторная работа n 19 Работа с множествами Задание 1
- •Задание 2-3
- •Задание 4
- •Задание 5
- •Лабораторная работа № 20 Работа с записями
- •Дополнительные залания
- •Задание 3
- •Задание 5
- •Задание 6 (дополнительный балл)
- •Дополнительное задание (до 3 баллов)
- •Задание 5
- •Примерные вопросы к собеседованиям Величина. Команды присваивания, ветвления и выбора.
- •Массивы
- •Литерные переменные
- •Процедуры и функции
- •Графика
- •Датчик случайных величин
- •Множества
- •Динамическая память
- •Деревья
- •Тексты программ для выполнения лабораторных работ Файл primer1.Pas
- •Файл lab10.Pas
- •Файл lab11.Pas
- •Файл List1.Pas
- •Файл List2.Pas
- •Файл lab5.Pas
- •Файл lab6.Pas
- •Примерный список индивидуальных задач
Задание 5
Научитесь самостоятельно использовать контекстную помощь (используя комбинацию клавиш Ctrl+F1), а также раздел Break/Watch главного меню Паскаля. Очистите окно редактора (FILE, NEW).Выйдите из Паскаля Выключите компьютер.
Лабораторная работа №2Команды присваивания, ввода и вывода. Составление простейших программ на языке Турбопаскаль.
Цель работы: научиться составлять простейшие программы на Паскале, содержащие команды ввода, вывода и их модификации, команды указания позиции курсора на экране, очистки экрана. Повторить правила запуска среды Турбопаскаль, загрузки, создания, записи файлов, редактирования, компиляции и исполнения программ.
Замечание: перед работой должна быть выполнена контролирующая программа по теме "Команда присваивания".
Задание 1
Загрузите программу с именем PRIMER1.pas.
Откомпилируйте и исполните программу.
Вставьте оператор очистки экрана так, чтобы при просмотре результатов исполнения программы на экране остались только ваши анкетные данные (не было бы строк, начинающихся со слова «Введите…»).
Организуйте вывод данных в столбик в центре экрана.
Сохраните программу под своим именем и удалите ее из редактора Паскаля.
Задание 2
Создайте свою программу так, чтобы решалась одна из перечисленных ниже задач (выбор задачи осуществляется преподавателем). Откомпилируйте программу и исполните ее, подобрав тестовые данные. Протестированную программу сохраните.
Вычислить площадь треугольника по трем сторонам.
Вычислить площадь треугольника по двум сторонам и углу между ними, заданному в градусах.
Вычислить площадь параллелограмма по двум сторонам и углу между ними, заданному в градусах.
Вычислить площадь четырехугольника по двум диагоналям и углу между ними, заданному в градусах.
Вычислить площадь равнобочной трапеции по большему основанию, боковой стороне и углу между ними, заданному в градусах.
Вычислить площадь равнобочной трапеции по длинам оснований и боковой стороны.
Вычислить площадь правильного n-угольника со стороной произвольной длины, вписанного в окружность радиуса R.
Вычислить длину окружности радиуса R.
Вычислить площади круга (R) и эллипса с полуосями а и b.
Задание 3
Очистите окно редактирования (FILE, NEW).
Введите и исполните программу PRIMER4.PAS.
Исправьте программу так, чтобы на рисунке изображалась одна из букв ваших инициалов (по выбору преподавателя).
Задание 4
Исправьте предыдущую программу так, чтобы созданный вами рисунок выводился в указанном ниже месте экрана.
В верхнем правом углу.
В правом нижнем углу.
В левом нижнем углу.
По центру экрана.
На средней вертикальной линии экрана сверху.
На средней вертикальной линии экрана снизу.
На средней горизонтальной линии экрана справа.
На средней горизонтальной линии экрана слева.
Задание 5
Составьте хорошо оформленную программу для решения одной из следующих задач:
Заданы три корня кубического уравнения: х1, х2, х3. Найти коэффициенты этого уравнения.
Заданы координаты точки подвески математического маятника А(х0, y0, z0) и координаты одной из точек его наивысшего подъема В(х1, y1, z1). Найти координаты самой низкой точки траектории и другой наивысшей точки подъема.
У квадрата АВСD на плоскости известны координаты двух противоположных вершин – точек А и С. Найти координаты точек В и D.
Русские неметрические единицы длины: 1 верста = 500 саженей; 1 сажень = 3 аршина; 1 аршин = 16 вершков; 1 вершок = 44,45 мм. Длина некоторого отрезка составляет р метров. Перевести ее в русскую неметрическую систему.
Найти координаты вершины параболы
Треугольник АВС задан длинами своих сторон. Найти длину высоты, опущенной из вершины А.