Составьте программу, каторая по задоннаму a исследует корни уравнения aх=5 и выводит на экран значение высленного корня либо сообщение "Корней нет"

Question

Информатика

Амвросий

16 декабря, 23:47

Составьте программу, каторая по задоннаму a исследует корни уравнения aх=5 и выводит на экран значение высленного корня либо сообщение "Корней нет"

+3

Ответы (1)

Знаете ответ?

Душа · Answer 1

Program fdfe;

var a, x: real;

Begin

Writeln ('введите a') ; read (a) ;

x:=5/a;

if x=0 then writeln ('корней нет') else

writeln ('х равно ', x) ;

readln;

end.