Составьте программу которая по заданному a исследует корни управления ax-5=0 и выводит на экран значения вычесленного корня либо сообщения ''Корней нет''
Составьте программу которая по заданному 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.
Не нашли ответ?
Похожие вопросы