Написал программу по вычислению корней кв. уравнения, но не понял, что надо вводить в...

0 голосов
43 просмотров

Написал программу по вычислению корней кв. уравнения, но не понял, что надо вводить в окно, помогите плиз

var a,b,c:integer;
x1,x2,d:real;
begin
readln(a,b,c);
if a=0 then writeln('уравнение не квадратное') else begin
d:=sqrt(b*b-4*a*c);
if d<0 then writeln('уравнение не имеет корней');<br> if d=0 then begin x1:=(-1*b)/(2*a); writeln(x1);end;
if d>0 then begin x1:=(-1*b)-d/(2*a); x2:=(-1*b)+d/(2*a);writeln(x1,' ',x2);end;
end
readln;
end.


Информатика (650 баллов) | 43 просмотров
Дан 1 ответ
0 голосов

Вводить нужно числа конечно, у вас написано readln(a,b,c) - в этой строке вы считываете 3 числа которые пользователь должен ввести в консоль через enter
ax2 + bx + c = 0, где a, b, c — некоторые числа (a ≠ 0), x — неизвестное.

(4.2k баллов)
0

Верно, Но как именно эти три числа вводить? Через запятую? Через Пробел? Или Ка?

0

я же написал через ентер! читайте внимательнее!