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

Question

Информатика

Сократ

7 января, 02:36

Составьте программу, каторая по задоннаму 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.