составить программу вычисления дискриминанта квадратного уравнения при вводе значений его коэфициентов с клавиатуры

1

Ответы и объяснения

2013-10-17T16:43:59+04:00
Var a, b, c: real;
begin
     readln(a, b, c);
     writeln(sqr(b) - 4 * a * c);
end.