- •1.1 Теоретические сведения
- •1.1.1 Структура программы в языке Паскаль
- •1.1.2 Основные типы данных
- •1.1.3 Оператор присваивания
- •1.1.4 Арифметические выражения
- •1.1.5 Логические выражения
- •1.1.6 Основные стандартные функции языка Паскаль
- •1.1.7 Основные функции ввода/вывода
- •1.1.8 Операторы цикла
- •1.1.9 Операторы перехода (безусловный и условные)
- •1.1.10 Работа с массивами
- •1.1.11 Процедуры и функции. Модули.
- •1.1.11.1 Модуль System
- •1.1.11.2 Модуль Crt
- •Порядок выполнения работ
- •Лабораторная работа №5. Работа с двумерными массивами
- •Лабораторная работа №6. Программирование с использованием подпрограмм
- •Содержание
- •1.1 Теоретические сведения 1
Лабораторная работа №6. Программирование с использованием подпрограмм
Цель работы: Ознакомиться с понятием глобальных и локальных переменных, формальных и фактических параметры. Научиться составлять программы на языке Паскаль с применением внутренних подпрограмм (процедур, функций) и внешних подпрограмм.
Необходимые математические формулы:
Обратные тригонометрические функции:


Гиперболические функции:
![]()
Расстояние между двумя точками в пространстве:
![]()
Уравнение прямой на плоскости, проходящей через две точки:
![]()
где
![]()
Точка находится внутри круга с центром в точке (х0, у0) и радиусом R, если выполняется неравенство: (х – x0)2 + (y– у0)2 ≤ R2.
Точка находится вне круга с центром в точке (х0, у0) и радиусом R, если выполняется неравенство: (х – x0)2 + (y– у0)2 > R2.
ВАРИАНТЫ ИНДИВИДУАЛЬНЫХ ЗАДАНИЙ
Задание 1.
Вычислить наибольшее значение заданной функции на интервале [–5; 5] с шагом 0,01, если
.
Для определения арккосинуса определить
и использовать функцию. Вывести значение
х
и значение функции f(x).Даны координаты вершин N-угольника на плоскости и координаты точки внутри него. Найти расстояние от данной точки до ближайшей вершины N-угольника (наименьшее расстояние).
Вычислить наименьшее значение заданной функции на интервале [–1; 1] с шагом 0,05, если
.
Для определения арксинуса определить
и использовать функцию. Вывести значение
х
и значение функции f(x).Произвольно заданы N точек в пространстве (для каждой точки заданы 3 координаты). Найти 2 точки, расстояние между которыми – наименьшее.
Вычислить наибольшее значение заданной функции на интервале (0; 10) с шагом 0,5, если
.
Для определения котангенса определить
и использовать функцию. Вывести значение
х
и значение функции f(x).Даны координаты вершин N-угольника на плоскости и координаты точки внутри него. Найти расстояние от данной точки до самой отдаленной вершины N-угольника (наибольшее расстояние).
Вычислить наименьшее значение заданной функции на интервале [–2; 2] с шагом 0,01, если
.
Для определения гиперболического
синуса определить и использовать
функцию. Вывести значение х
и значение функции f(x).Произвольно заданы N точек в пространстве (для каждой точки заданы 3 координаты). Найти 2 точки, расстояние между которыми – наибольшее.
На плоскости задано N точек. Найти все точки, лежащие внутри круга радиуса R с центром в начале координат.
Вычислить наименьшее значение заданной функции на интервале [–2; 2] с шагом 0,02, если
.
Для определения гиперболического
косинуса определить и использовать
функцию. Вывести значение х
и значение функции f(x).
Задание 2.
Составить процедуру вычисления значения интеграла на заданном промежутке, используя формулу трапеций:

Использовать формальный параметр-функцию.
Значения a и b также включить в список параметров процедуры.
Значение h выбрать равным 0,05.
Значение
п
вычислить по формуле:
.
Учесть,
что ![]()
Составить программу вычисления интеграла для своего варианта задания. Вывести результат на экран. Данные для своего варианта задания взять из таблицы:
|
№ |
a |
b |
f(x) |
|
1 |
1 |
12 |
7th(3x2–1) |
|
2 |
2 |
11 |
3cth(2x2+1) |
|
3 |
3 |
15 |
4th(x2+1) |
|
4 |
4 |
14 |
5cth(x2/2+1) |
|
5 |
5 |
13 |
6ch(–2x2–1) |
|
6 |
6 |
17 |
8ch(4x2+3) |
|
7 |
7 |
16 |
2sh(6x2+7) |
|
8 |
-1 |
9 |
9sh(x2/2+1) |
|
9 |
-2 |
13 |
7cos(2x2–3) |
|
10 |
-3 |
15 |
6cos(4x2+3) |
