zadany информатика / Turbo Pascal / Работа_14_1

Лабораторная работа №14_1

ПРОЦЕДУРЫ

1. Составить процедуру вычисления тангенса и , используя ее вычислить

Y=tg²A + ctgA.

2. Составить процедуру вычисления площади круга, зная длину его окружности. Используя эту процедуру , вычислить сумму площадей кругов с длинами окружностей L1, L2, L3.

3. Составить процедуру вычисления максимального из двух чисел. Используя эту процедуру, вычислить максимальное из трех чисел.

4. Составить процедуру вычисления минимального из двух чисел. Используя эту процедуру, вычислить минимальное из трех чисел.

5. Составить процедуру вычисления площади прямоугольника по двум его сторонам. Используя эту процедуру , вычислить площадь вашей квартиры.

6. Составить процедуру вычисления суммы двух чисел. Используя эту процедуру вычислить Y = (A+B)*(C+D+R).

7. Составить процедуру вычисления средней температуры за К дней. Вычислить среднюю температуру недели, декады и месяца.

8. Составить программу вычисления периметра треугольника, заданного координатами своих вершин, используя процедуру вычисления расстояния между двумя точками на плоскости.

9. Составить процедуру вычисления квадрата Х: Y = х². Используя ее, вычислить x³ , x⁴.

10. Составить программу вычисления значения функции

Z = y(x³ + 1) – y(x – 1),

где функция у(х) оформлена в виде процедуры:

sin x, x<a;

Y(x)= cos x, a<x<b;

tg x, x>b.