Составить приложение на языке Pascal

1.

Задание №1 (Ветвления)
Составить приложение на языке Pascal.
Вариант задания выбирается по последней цифре зачетной книжке.
Вариант
Задание
0
По заданным значениям x,y вычислить
max( x + y, x ⋅ y / 2), x ≤ 0
Z =
1/ 2
min(( x ⋅ y ) , x + y / 2), x > 0
1
Определить в какую четверть координатной плоскости
попала точка с координатами (x,y). Переменной N
присвоить номер четверти. Если точка попала в начало
координат, то N=0. Если точка попала на ось X или Y, то
напечатать сообщение об этом.
2
Даны числа А1, В1, С1, А2, В2,С2, Напечатать координаты
точки пересечения прямых: А1x+B1y=C1 и A2x+B2y=C2,
либо сообщить, что эти прямые совпадают, не
пересекаются или вовсе не существуют.
3
Даны произвольные числа a,b,c. Выяснить существует ли
треугольник с такими длинами сторон. Если треугольник
существует, то ответить является ли он равносторонним,
равнобедренным или каким либо иным.
4
Треугольник задан вершинами (x1,y1), (x2,y2), (x3,y3).
Принадлежит ли заданная точка (a,b) указанному
треугольнику.
5
Даны действительные положительные числа a,b,c,x,y.
Выяснить, пройдет ли кирпич с ребрами a,b,c в
прямоугольнике отверстие со сторонами х и у. При
просовывании кирпича ребра его должны быть
параллельны или перпендикулярны сторонам отверстия.
Даны две тройки чисел a,b,c и x,y,z. (число, месяц, год).
Определить количество полных лет, прошедших между
этими датами.
Дано число x . Напечатать в порядке возрастания числа:
chx, 1+|x|, 2·x·(1+x).
6
7
8
Даны действительные числа x,y,z. Получить min(x,y,z) и
max(x,y,z).
9
Если сумма трех попарно различных действительных
чисел x,y,z меньше единицы, то наименьшее из этих
чисел заменить полусуммой двух оставшихся значений.