Написать блок-схему и программу линейного уравнения ax+b= 0
Написать блок-схему и программу линейного уравнения
ax+b= 0
Гость
Ответ(ы) на вопрос:
ГостьПрошу прощения за помарки. Программа рабочая.
//PascalABC.Net
//NaaMan
var
a,b : real;
begin
write('Введите А и В: ');
readln(a,b);
if (a=0) then
writeln('Корень отсутствует')
else
writeln('Корень ', -b / a)
end.
Не нашли ответ?
Похожие вопросы