У меня есть вот такое простенькое задание:
1)По заданным коэффициентам уравнение прямой линии на плоскости(Ax+By+C=0) должен

вычисляться угол (в градусной мере, образуемый этой прямой с положительным

направлением оси OX (полагается, что А неравно 0 , B неравно 0 )
Эту программку я сделал
Вот Она:
Program Ygol;
Var (a,b,c,y):real;
Begin
Write('Vvedite a,b,c:');
Readln(a,b,c);
y:=(arctan(a/b)/Pi*180);
Writeln('Ygol raven',y:6:2);
Writeln('Isxodnie dannie',a:7:2,b:7:2,c:7:2);
End.
А мне нада вот что:
2)Модифицировать полученную при выполнении предыдущей работы программу так, чтобы

при решении задачи на ПК обеспечивалась при необходимости проверка вводимых исходных

данных на допустимость - соответствие области определения, а так же(в соответствии с

предыдущем вариантом задачи):
учитывался случай B=0 при A неравно 0 и определялось, проходит ли заданная

коэффициентами уравнения прямая через начало координат !