Примечание. Уклон линии — отношение превышения h между точками к горизонтальному проложению S между ними

Уклон линии — отношение превышения h между точками к горизонтальному проложению S между ними.

Превышение — разность высот точек.

Горизонтальное проложение — ортогональная проекция линии местности на горизонтальную плоскость.

Высоты горизонталей всегда кратны высоте сечения рельефа. Высота сечения рельефа — это расстояние, на которое отстоят друг от друга уровенные поверхности, рассекающие земную поверхность.

№ 3.14. Написать программу для вычисления предполагаемого валового сбора зерна по формулам:

где x₁, x₂, x₃ — площади почвенных групп (в га),

R — текущая норма осадков (в мм).

Форма запросов при вводе исходных данных и сообщений при выводе результатов.

ПЛОЩАДИ ПОЧВЕННЫХ ГРУПП:

X1=

X2=

X3=

ТЕКУЩАЯ НОРМА ОСАДКОВ=

ПРЕДПОЛАГАЕМЫЙ ВАЛОВЫЙ СБОР ЗЕРНА=значение Y ц.

№ 3.15. Написать программу для определения положения точки с координатами X1, Y1 по отношению к полосе шириной P, ось которой описывается уравнением AX + BY + C = 0.

Расстояние от точки с координатами X1, Y1 до прямой можно вычислить по формуле

Условием нахождения точки в указанной полосе является неравенство R£P/2.

В программе предусмотреть запросы на ввод исходных данных:

A, B, C=

P=

X1, Y1=

Результат выводить в виде одного из сообщений:

ТОЧКА В ПРЕДЕЛАХ ПОЛОСЫ или

ТОЧКА ЗА ПРЕДЕЛАМИ ПОЛОСЫ

№ 3.16. Написать программу для определения положения точки с координатами X1, Y1 по отношению к круглому участку радиуса R с центром в точке с координатами X₀, Y₀.

Пояснение: признаком нахождения точки внутри или на границе участка является выполнение неравенства

где DX=X1-X0, DY=Y1-Y0.

В программе предусмотреть выдачу запросов на ввод исходных данных:

X0, Y0=

R=

X1, Y1=

Результаты выводить в виде одного из сообщений:

ТОЧКА В ПРЕДЕЛАХ УЧАСТКА или

ТОЧКА ЗА ПРЕДЕЛАМИ УЧАСТКА

№ 3.17. Написать программу для определения положения точки с координатами X₁, Y₁, Z₁ по отношению к сфере с радиусом R и координатами центра X₀, Y₀, Z₀. Признаком нахождения точки внутри сферы или на ее границе является выполнение неравенства

где

В программе предусмотреть выдачу запросов на ввод исходных данных:

X0, Y0, Z0=

R=

X1,Y1, Z1=

Результаты выводить в виде одного из сообщений:

ТОЧКА ЗА ПРЕДЕЛАМИ СФЕРЫ или

ТОЧКА В ПРЕДЕЛАХ СФЕРЫ

№ 3.18. Написать программу для определения положения точки с координатами X1, Y1 по отношению к прямой, описываемой уравнением AX + BY + C = 0. Признаком того, что точка лежит на прямой, будем считать выполнение неравенства:

Форма запросов при вводе исходных данных:

A, B, C=

X1, Y1=

Форма вывода результата:

ТОЧКА НА ПРЯМОЙ или

ТОЧКА ВНЕ ПРЯМОЙ,

в зависимости от выполнения или невыполнения заданного условия.

№ 3.19. Написать программу, которая определяет положение прямой, заданной уравнением AX+BY+C=0, относительно прямоугольной системы координат. Возможные ситуации:

A=0, B=0, C — любое — ошибка при вводе исходных данных, прямой не существует,

A=0, B¹0, C=0 — прямая совпадает с осью X,

A¹0, B=0, C=0 — прямая совпадает с осью Y,

A=0, B¹0, C¹0 — прямая проходит через точку Y= –C/B

параллельно оси X,

A¹0, B=0, C¹0 — прямая проходит через точку Y= –C/A

параллельно оси Y,

A¹0, B¹0, C=0 — прямая проходит через начало координат и точку с произвольным значением X (предусмотреть в случае возникновения указанной ситуации ввод значения X) и Y = –AX/B.

A¹0, B¹0, C¹0 — прямая пересекает ось X в точке X= –C/A и ось

Y в точке Y=-C/B.

Запросы при вводе исходных данных:

ПАРАМЕТРЫ A, B, C =

Форма вывода результатов:

СОВПАДАЕТ С ОСЬЮ X

или СОВПАДАЕТ С ОСЬЮ Y

и т. п.

В случае A¹0, B¹0, C=0 вначале выводить запрос: «ВВЕДИТЕ ЛЮБОЕ ЗНАЧЕНИЕ X», а затем сообщение:

«ПРОХОДИТ ЧЕРЕЗ НАЧАЛО КООРДИНАТ И ТОЧКУ

X = значение, Y = значение».

№ 3.20. Написать программу, которая определяет, лежит ли точка с координатами X, Y на прямой, проведенной через точки с координатами X₁, Y₁ и X₂, Y₂. Признаком, того что точка лежит на прямой, будем считать выполнение неравенства.

.

Форма вывода результата:

ТОЧКА НА ПРЯМОЙ, если точка лежит на прямой, и

ТОЧКА ВНЕ ПРЯМОЙ, если точка лежит не на прямой.

Форма запроса при вводе исходных данных:

КООРДИНАТЫ X1, Y1=

КООРДИНАТЫ X2, Y2=

КООРДИНАТЫ X, Y=

Циклы

В данном параграфе рассматриваются следующие вопросы: операторы цикла (For do, While do, Repeat Until), компонент Memo.

Теория