Составьте программу которая по заданному a исследует корни управления ax-5=0 и выводит на экран значения вычесленного корня либо сообщения ''Корней нет''
Program qq; var a,x:real; begin read(a); x:=5/a; if a=0 then writeln('Корней нет') else writeln(x); end.
спасибо
ты настоящий пацан
:))