Записать на языке pascalABC программу решения линейного уравнения ax+b=0 по блок схеме
Записать на языке pascalABC программу решения линейного уравнения ax+b=0 по блок схеме
Ответ(ы) на вопрос:
Гость
Var a,b:real;
Begin
WriteLn('ax +b = 0');
Write('A = ');Read(A);
Write('B = ');Read(B);
Write('x = ',-b/a)
End.
Не нашли ответ?
Похожие вопросы