15.02.2010, 23:25
|
|
Участник форума
Регистрация: 06.02.2006
Сообщений: 177
Провел на форуме:
1576821
Репутация:
88
|
|
if (d>0)
begin
x1 := ((-b) + (sqrt(d))) /(2 * a) ;
x2 := ((-b) - (sqrt(d))) /(2 * a) ;
end;
короче не считаем корня из -|d|. B И это не ед. место где вы не используете блоки begin end.
Последний раз редактировалось Irdis; 15.02.2010 в 23:32..
|
|
|