ЛАБОРАТОРНАЯ РАБОТА № 7 (8 часов)
материал по информатике и икт (11 класс) на тему
ЛАБОРАТОРНАЯ РАБОТА № 7 (8 часов)
ТЕМА: «Работа с подпрограммами с использованием функций и процедур»
Необходимые технические средства:
Персональный компьютер Пентиум-4.
Необходимые программные средства:
Система программирования Турбо Паскаль.
Цель работы: Обучить студентов методам построения блок-схем и составления программ на языке Паскаль с подпрограммами-функциями и подпрограммами-процедурами.
ЗАДАНИЕ: Построить блок-схему и составить программу для решения задачи по своему варианту. При составлении программы использовать подпрограммы-функции и подпрограммы-процедуры. Осуществить вывод значений вводимых исходных данных и результаты вычисления.
Варианты к заданию
Вар. | Условия задачи | Примечание |
1 | Вычислить корни квадратных уравнений x2-ax+b=0 cy2-dy-f=0 | Все корни действительные |
2 | Подсчитать число точек, находящихся внутри круга радиусом r с центром в начале координат; координаты заданы массивами X(100), Y(100) | Расстояние точки от начала координат вы-числять в подпрограм-ме |
3 | Определить периметры треугольников, заданных координатами их вершин XA(5), XB(5), XC(5), YA(5), YB(5), YC(5) | Длину стороны треу-гольников вычислять в подпрограмме |
4 | Подсчитать число точек, находящихся внутри круга радиусом r с центром в точке с координатами (1,1); координаты заданы массивами X(80), Y(80) | Расстояние точки от центра круга определять в подпрограмме |
5 | Вычислить Z=(V1+V2+V3)/3, где V1, V2, V3--объёмы шаров с радиусами r1, r2, r3 соответственно | V1 ,V2 V3 вычислить в подпрограмме |
6 | Вычислить Z=(V1+S1+S2+V2+V3+S3)/6, где V1, V2, V3-объёмы шаров, S1,S2,S3 – площадь шаров с радиусами r1, r2, r3 соответсвенно | V1 ,V2 V3, S1 ,S2 ,S3 вычислить в подпрограмме |
7
| Вычислить квадрат положительных элементов массивов X(N), Y(M), Z(K) | N60, M60, K70 |
8 | Вычислить сумму среднегеометрического и среднеарифметического значения отрицательных элементов массивов A(10), B(20), C(20) |
|
9 | Вычислить среднееарифметическое положительных элементов для массивов A(N1), B(N2), C(N2) | N1100, N2100, N3100 |
10 | Подсчитать средне геометрическое значение массивов X(10,15) и Y(20,12) |
0xij1, 0yij1 |
11
| Вычислить суммы положительных элементов каждой матрицы A(10,12), B(15,10) |
--------- |
12 | Вычислить Z=, где и - наименьшие элементы массивов X1(70), X2(80) |
--------- |
13 | Вычислить сумму элементов главных диагоналей матриц A(N,N), B(M,M) | M20, N30 |
14 | Вычислить Z=, где S1 – сумма положительных элементов массива X(50); S2 – сумма отрицательных элементов массива Y(60) | Обе суммы вычислять в одной программе |
15 | Подсчитать число нулевых элементов для матриц A(N,M) и B(M,N) | M20, N20 |
16 | Вычислить суммы элементов нижних треугольных диагоналей для матриц A(15,15), B(20,20) |
--------- |
17 | Определить число положительных элементов до первого отрицательного в массивах X(40), Y(50), Z(N) |
N50
|
18 | Вычислить разность между средне- геометрическим и среднеарифметическими значениями положительных элементов массивов A(10), B(15), C(10) |
|
19 | Вычислить сумму среднегеометрического и среднеарифметического значения положи-тельных элементов массивов A(15), B(15), C(20) |
|
20 | Подсчитать число точек, не находящихся внутри круга с радиусом r, с центром в начале координат; координаты заданы массивами X(100), Y(100) | Расстояние от начала координат до точки определять в одной подпрограмме |
ТЕОРЕТИЧЕСКАЯ ЧАСТЬ
Функции представляют собой группу операторов, в результате которых вычисляется одно значение, происваиваемое имени функции.
Общая структура записи функции имеет вид:
FUNCTION F(q1: T1; q2: T2;….): T;
BEGIN
P1;
P2;
…
F:=
END;
где F – имя функции; qi – имена формальных параметров; Ti – типы параметров; Т – тип имени функции; Pi – операторы тела функции.
Функция может иметь собственные локальные константы, типы, переменные и вспомогательные процедуры и функции.
Обращение к функции осуществляется в правой части оператора присваивания, при этом в выражении записываются имя и фактические параметры в виде
F(b1,b2,…),
где F – имя функции; bi – фактические параметры.
После выполнения функции вычисленное значение присваивается имени функции и передается в выражение.
Процедуры используются в тех случаях, когда необходимо в подпрограмме получить несколько результатов. Процедура определяется в разделе описания процедур.
Общая структура записи прцедуры имеет вид:
PROCEDURE F(VARq1:T1; q2: T2; …);
BEGIN
P1
P2
…
END;
где F – имя процедуры; qi - имена формальных параметров; Ti - тип формальных параметров; Pi - операторы процедуры.
Обращение к процедуре осуществляется опратором процедуры, в котором записываются ее имя и фактические параметры F(b1,b2,…); где bi – фактические параметры, которые сответствуют формальным по количеству, типу и месту расположения.
Скачать:
Вложение | Размер |
---|---|
7 | 96 КБ |
Предварительный просмотр:
ЛАБОРАТОРНАЯ РАБОТА № 7 (8 часов)
ТЕМА: «Работа с подпрограммами с использованием функций и процедур»
Необходимые технические средства:
Персональный компьютер Пентиум-4.
Необходимые программные средства:
Система программирования Турбо Паскаль.
Цель работы: Обучить студентов методам построения блок-схем и составления программ на языке Паскаль с подпрограммами-функциями и подпрограммами-процедурами.
ЗАДАНИЕ: Построить блок-схему и составить программу для решения задачи по своему варианту. При составлении программы использовать подпрограммы-функции и подпрограммы-процедуры. Осуществить вывод значений вводимых исходных данных и результаты вычисления.
Варианты к заданию
Вар. | Условия задачи | Примечание |
1 | Вычислить корни квадратных уравнений x2-ax+b=0 cy2-dy-f=0 | Все корни действительные |
2 | Подсчитать число точек, находящихся внутри круга радиусом r с центром в начале координат; координаты заданы массивами X(100), Y(100) | Расстояние точки от начала координат вы-числять в подпрограм-ме |
3 | Определить периметры треугольников, заданных координатами их вершин XA(5), XB(5), XC(5), YA(5), YB(5), YC(5) | Длину стороны треу-гольников вычислять в подпрограмме |
4 | Подсчитать число точек, находящихся внутри круга радиусом r с центром в точке с координатами (1,1); координаты заданы массивами X(80), Y(80) | Расстояние точки от центра круга определять в подпрограмме |
5 | Вычислить Z=(V1+V2+V3)/3, где V1, V2, V3--объёмы шаров с радиусами r1, r2, r3 соответственно | V1 ,V2 V3 вычислить в подпрограмме |
6 | Вычислить Z=(V1+S1+S2+V2+V3+S3)/6, где V1, V2, V3-объёмы шаров, S1,S2,S3 – площадь шаров с радиусами r1, r2, r3 соответсвенно | V1 ,V2 V3, S1 ,S2 ,S3 вычислить в подпрограмме |
7 | Вычислить квадрат положительных элементов массивов X(N), Y(M), Z(K) | N60, M60, K70 |
8 | Вычислить сумму среднегеометрического и среднеарифметического значения отрицательных элементов массивов A(10), B(20), C(20) | |
9 | Вычислить среднееарифметическое положительных элементов для массивов A(N1), B(N2), C(N2) | N1100, N2100, N3100 |
10 | Подсчитать средне геометрическое значение массивов X(10,15) и Y(20,12) | 0xij1, 0yij1 |
11 | Вычислить суммы положительных элементов каждой матрицы A(10,12), B(15,10) | --------- |
12 | Вычислить Z=, где и - наименьшие элементы массивов X1(70), X2(80) | --------- |
13 | Вычислить сумму элементов главных диагоналей матриц A(N,N), B(M,M) | M20, N30 |
14 | Вычислить Z=, где S1 – сумма положительных элементов массива X(50); S2 – сумма отрицательных элементов массива Y(60) | Обе суммы вычислять в одной программе |
15 | Подсчитать число нулевых элементов для матриц A(N,M) и B(M,N) | M20, N20 |
16 | Вычислить суммы элементов нижних треугольных диагоналей для матриц A(15,15), B(20,20) | --------- |
17 | Определить число положительных элементов до первого отрицательного в массивах X(40), Y(50), Z(N) | N50 |
18 | Вычислить разность между средне- геометрическим и среднеарифметическими значениями положительных элементов массивов A(10), B(15), C(10) | |
19 | Вычислить сумму среднегеометрического и среднеарифметического значения положи-тельных элементов массивов A(15), B(15), C(20) | |
20 | Подсчитать число точек, не находящихся внутри круга с радиусом r, с центром в начале координат; координаты заданы массивами X(100), Y(100) | Расстояние от начала координат до точки определять в одной подпрограмме |
ТЕОРЕТИЧЕСКАЯ ЧАСТЬ
Функции представляют собой группу операторов, в результате которых вычисляется одно значение, происваиваемое имени функции.
Общая структура записи функции имеет вид:
FUNCTION F(q1: T1; q2: T2;….): T;
BEGIN
P1;
P2;
…
F:=
END;
где F – имя функции; qi – имена формальных параметров; Ti – типы параметров; Т – тип имени функции; Pi – операторы тела функции.
Функция может иметь собственные локальные константы, типы, переменные и вспомогательные процедуры и функции.
Обращение к функции осуществляется в правой части оператора присваивания, при этом в выражении записываются имя и фактические параметры в виде
F(b1,b2,…),
где F – имя функции; bi – фактические параметры.
После выполнения функции вычисленное значение присваивается имени функции и передается в выражение.
Процедуры используются в тех случаях, когда необходимо в подпрограмме получить несколько результатов. Процедура определяется в разделе описания процедур.
Общая структура записи прцедуры имеет вид:
PROCEDURE F(VARq1:T1; q2: T2; …);
BEGIN
P1
P2
…
END;
где F – имя процедуры; qi - имена формальных параметров; Ti - тип формальных параметров; Pi - операторы процедуры.
Обращение к процедуре осуществляется опратором процедуры, в котором записываются ее имя и фактические параметры F(b1,b2,…); где bi – фактические параметры, которые сответствуют формальным по количеству, типу и месту расположения.
По теме: методические разработки, презентации и конспекты
ЛАБОРАТОРНАЯ РАБОТА № 1 (8 часов)
ЛАБОРАТОРНАЯ РАБОТА № 1 (8 часов) ТЕМА: « Работа в среде Турбо Паскаль » Необходимые технические средства:Персональный компьютер Пентиум-4. Необходимые программные средства:Систе...
ЛАБОРАТОРНАЯ РАБОТА № 2 (8 часов)
ЛАБОРАТОРНАЯ РАБОТА № 2 (8 часов) ТЕМА: « Программирование алгоритмов линейной структуры » Необходимые технические средства:Персональный компьютер Пентиум-4. Необходимые про...
ЛАБОРАТОРНАЯ РАБОТА № 3 (8 часов)
ЛАБОРАТОРНАЯ РАБОТА № 3 (8 часов) ТЕМА: « Программирование алгоритмов разветвляющейся структуры » Необходимые технические средства:Персональный компьютер Пентиум-4. Необходимые пр...
ЛАБОРАТОРНАЯ РАБОТА № 4 (8 часов)
ЛАБОРАТОРНАЯ РАБОТА № 4 (8 часов) ТЕМА: « Программирование алгоритмов циклической структуры » Необходимые технические средства:Персональный компьютер Пентиум-4. Необходимые ...
ЛАБОРАТОРНАЯ РАБОТА № 5 (8 часов)
ЛАБОРАТОРНАЯ РАБОТА № 5 (8 часов) ТЕМА: « Работа с одномерными массивами » Необходимые технические средства:Персональный компьютер Пентиум-4. Необходимые програм...
ЛАБОРАТОРНАЯ РАБОТА № 6 (8 часов)
ЛАБОРАТОРНАЯ РАБОТА № 6 (8 часов) ТЕМА: « Работа с двумерными массивами » Необходимые технические средства:Персональный компьютер Пентиум-4. Необходимые программные средства:Систе...
ЛАБОРАТОРНАЯ РАБОТА № 9 (8 часов)
ЛАБОРАТОРНАЯ РАБОТА № 9 (8 часов) ТЕМА: « Работа с поисковыми серверами в MS Internet Explorer» Необходимые технические средства:Персональный компьютер Пентиум-...