Microsoft Word Лаб практ инф

Методика выполнения работы
 
 
1. Программа: 
Program PrPol; 
Uses crt; 
Var xi,yi,ri,fi:Real; 
n,i:Integer; 
Procedure 
Polar(x,y:Real;Var 
r,f:Real);{Заголовок 
подпрограммы-
процедуры} 
Begin {Начало тела подпрограммы-процедуры} 
r:=Sqrt(x*x+y*y)
 
 
f:=Arctan(y/x); 
End;
 
 
{Конец тела подпрограммы-процедуры} 
Begin 
Clrscr; 
Writeln(‘Введите количество точек’); 
Readln(n); 
For i:=1 To n Do 
Begin 
Writeln(‘Введите координаты x и y’,i:3,’-й точки’); 
Readln(xi,yi); 
Polar(xi,yi,ri,fi); {Обращение к процедуре Polar} 
Write(ri:8:2,fi:8:2); 
Writeln 
End; 
End. 

---

89
2. Наберите, откомпилируйте и исправьте возможные ошибки. Проведите 
расчеты для конкретных значений исходных данных. Для тестирования 
возьмите данные, для которых результат очевиден, например, x=2, y=0. 
 
Задания для самостоятельной работы
 
 
Составить программу на языке Паскаль, отладить и провести расчеты. 
Вариант 1.1. Вычислить 
y
i
= tan(x) для x, изменяющегося на интервале 
[0?
2

] c шагом 
10

. Вычисление tan(x) оформить в виде подпрограммы-функции 
с именем tan. 
Вариант 1.2. Вычислить 
z
i 
= x
y
для y = 
5
1
, x изменяется на интервале 
[1? 10] с шагом 0.2. Вычисление x
y
оформить в виде подпрограммы-функции с 
именем X_Y.
 
Вариант 1.3. Вычислить 
t
i 
= lg(x) для x, изменяющегося на интервале 
[1? 100] с шагом 5. Вычисление lg(x) оформить в виде подпрограммы-функции с 
именем lg.
 
Вариант 1.4. 
Заданы два одномерных массива X и Y с количеством 
элементов у обоих равным 20. Сформировать массив Z, элементами которого 
являются максимальные элементы массивов X и Y, т.е.:Z
i
=MAX(X
i
,Y
i
). 
Нахождение максимума из двух чисел оформить в виде подпрограммы-
функции с именем MAX. 
Вариант 1.5. Составить программу для определения числа размещений 
)!
(
!
m
n
n
A
m
n


. Вычисление факториала оформить в виде рекурсивной 
подпрограммы- функции. 
 
Вариант 2.1. Заданы два одномерных массива 
A и B с количеством 
элементов у обоих, равным 15. Найти максимальный и минимальный элементы 
в каждом массиве. Нахождение максимума и минимума одномерного массива 
оформить в виде подпрограммы-процедуры с именем MAX_MIN. 
Вариант 2.2. Заданы два одномерных массива 
U и V с количеством 
элементов у обоих равным 10. Найти минимальный элемент и его номер в 
каждом массиве. Нахождение минимума и его номера в одномерном массиве 
оформить в виде подпрограммы-процедуры с именем MIN_N. 
 
Вариант 2.3. Написать подпрограмму
-процедуру ввода построчно 
матрицы размером M
?N и использовать ее для ввода матриц A размером 3?3 и 
B размером 4
?2. 

---

90
Вариант 2.4.
Написать подпрограмму-процедуру вывода построчно 
матрицы размером M
?N и использовать ее для вывода матриц C размером 2?5 и 
D размером 2
?2.