Задача наверное покажется лёгкой-лёгкой, кому-то, но я что-то вот никак.
Исходная задача:
1. по данным коэффициентам уравнения прямой линии на плоскости (Ах+Ву+С=0) должен вычисляться угол, образуемый этой прямой с положительным направлением оси оХ (полагается, что А<>0, В<>0).
2. доработать программу так, чтобы выполнялась проверка на допустимость вводимых данных, а так же учитывался случай В=0, при А<>0 и определялось, проходит ли заданная коэффициентами уравнения прямая через начало координат.

Формулу нашла для вычисления угла -tg(a/b), вот только если решать дальше, без с, то ничего хорошего не выходит.

Помогите, пожалуйста, кто чем может....

Вот здесь точно лишнее условие. Проще написать "if c=0 then"
b в любом случае либо равно 0, либо не равно 0.
И есть одна ошибочка при переводе в градусы. Нужно поделить на pi и умножить на 180.
writeln('Gr=',(((pi/2+arctan(b/a)))/pi*180));
Тогда получится 90 градусов (IMG:style_emoticons/default/smile.gif)
Можно даже написать, скажем writeln('Gr=',(((pi/2+arctan(b/a)))/pi*180):5:5);
Тогда будет точно видно что это 90 градусов (IMG:style_emoticons/default/smile.gif)