Turbo Pascal 07

Условный оператор if

1. Музыкальный диск стоит х рублей п копеек. У вас имеется а рублей b копеек. Хватит ли вам денег на покупку диска? В программе предусмотрите вывод слов "Да" или "Нет". В случае недостатка, определите, сколько денег нужно добавить.
2. Прием на работу идет на конкурсной основе. Условия приема требуют 20 лет рабочего стажа и возраста не более 42 лет. Определите, будет ли человек принят на работу.
3. Даны произвольные числа а, b, с. Напечатать 3, 2 или 1 в зависимости от того, равносторонний это треугольник, равнобедренный или какой-либо другой.
4. Даны действительные числа х₁, у₁, х₂, у₂ и r (r > 0). Определить, лежит ли точка с координатами x₁, y₁ вне круга радиуса r с центром в точке x₂, y₂.
5. Даны три действительных числа. Выбрать из них те, которые принадлежат интервалу (1..10).