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

Question

Информатика

Кирила

20 августа, 13:32

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

+1

Ответы (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.