Условный оператор(паскаль)

[Lord123]

1. Если значение переменной w не равно 0 и при этом котангенс от w меньше 0.5.
тогда поменять знак у w, а если значение w равно 0, тогда присвоить w значение 1.
2. Написать программу для решения указанной задачи:
а) даны числа а, b, с (а≠0). Найти вещественные корни уравнения ах2+ bх4 + с=0.
если корней нет, то сообщить об этом;
б) даны произвольные числа а, b, с. Если нельзя построить треугольник с такими
длинами сторон, то напечатать 0, иначе напечатать 3, 2 или 1 в зависимости от
того, равносторонний этот треугольник, равнобедренный или какой-либо иной.

[ROMA2PVT]

http://www.cyberforum.ru/pascal/thread80072.html
Блиин.Ну поисковик вам зачем?Вот вторая.Эт всё легко ваще просто.Ну а по первой: включите мозги и подумайте.Эт очень просто.

[ROMA2PVT]

ах2+ bх4 + с=0.

bx^4- эт ошибка чтоли?

[RUSt88]

обращайтесь, выполню за вознаграждение