Информатика, опубликовано 2018-08-22 20:03:22 by Гость
Помогите разработать программу в delphi для вычисления квадратных уравнений.
Ответ оставил Гость
Как-то так
procedure SqRoot(a,b,c: real;var x1,x2: real;var ok: boolean);{ a,b,c – коэффициенты уравнения x1,x2 – корни уравненияok = True – решение есть ok = False – решения нет }vard: real; // дискриминантbegind: = Sqr(b) -4*a*c; if d
Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.