Даны вещественные числа a, b и c, причем a отлично от
Даны вещественные числа a, b и c, при этом a отлично от 0. Решить квадратное уравнение ax2 + bx + c = 0 либо сказать о том, что решений нет. Написать программку на компиляторе Бейсик!!!!!!!!!!!
Задать свой вопрос1 ответ
Марина
INPUT "a="; a
INPUT "b="; b
INPUT "c="; c
IF c = 0 THEN
IF b = 0 THEN
PRINT "x=0"
ELSE
x1 = 0: x2 = -b / a
PRINT "x1="; x1, "x2="; x2
END IF
ELSE
IF b = 0 THEN
x1 = -c / a: x2 = -x1
PRINT "x1="; x1, "x2="; x2
ELSE
D = b ^ 2 - 4 * a * c
IF D lt; 0 THEN
PRINT "Нет действительных корней"
ELSE
IF D = 0 THEN
x = -b / (2 * a)
PRINT "x="; x
ELSE
D = SQR(D)
x1 = (-b - D) / (2 * a): x2 = (-b + D) / (2 * a)
PRINT "x1="; x1, "x2="; x2
END IF
END IF
END IF
END IF
END
, оставишь ответ?
Похожие вопросы
-
Вопросы ответы
Новое
NEW
Статьи
Информатика
Статьи
Последние вопросы
задание экономиоти
Рассмотри ситуацию: человек живёт на Крайнем Се-вере. С помощью каких
Экономика.
Человек живет на Крайнем Севере. С помощью каких благ удовлетворяются потребности
Экономика.
там лежат три яйца.у дома рос клен.Это гнездо сойки.на клёне гнездо
Русский язык.
Тыныштық күйіндегі карусель 35 с-та 3,0 рад/с бұрыштық жылдамдықпен үдей қозғалады.
Разные вопросы.
Сочинение на тему "Русский язык не сможет умереть!"
Математика.
Приветствую!
Меня зовут Станислав, я представляю компанию under.site.
Хотел бы предложить интересное решение
Разные вопросы.
Масса трёх одинаковых пакетов чая 180г чему равна масса
Математика.
Газообразный аммиак объёмом 2.24 л (н.у.) был полностью поглощён 14.68 мл
Химия.
Упражнение 2 Выпишите глаголы и вставьте пропущенные буквы
Русский язык.
Радиус окружности, описанной около равностороннего треугольника, равен 6. Найдите сторону треугольника
Геометрия.
Облако тегов