Лучшие помощники
- Megamozg 2205 б
- Matalya1 1800 б
- DevAdmin 1720 б
- arkasha_bortnikov 900 б
- Dwayne_Johnson 870 б
16 декабря 2022 15:53
1310
Вычисление корней квадратного уравнения в Кумире. Срочно пж,зарание спасибо.
1
ответ
Алг
нач
цел a, b, c, d
вещ x0, x1, x2
вывод "Введите значение переменных a, b, c."
ввод a, b, c
d := b*b - 4*a*c
если d < 0 то вывод "Корней нет." все
если d = 0 то
x0 := -b/(2*a)
вывод "Корень = "
вывод x0
все
если d > 0 то
x1 := (-b + sqrt(d))/(2*a)
x2 := (-b - sqrt(d))/(2*a)
вывод "Корни: "
вывод x1
вывод x2
все
кон
нач
цел a, b, c, d
вещ x0, x1, x2
вывод "Введите значение переменных a, b, c."
ввод a, b, c
d := b*b - 4*a*c
если d < 0 то вывод "Корней нет." все
если d = 0 то
x0 := -b/(2*a)
вывод "Корень = "
вывод x0
все
если d > 0 то
x1 := (-b + sqrt(d))/(2*a)
x2 := (-b - sqrt(d))/(2*a)
вывод "Корни: "
вывод x1
вывод x2
все
кон
0
·
Хороший ответ
18 декабря 2022 15:53
Остались вопросы?
Еще вопросы по категории Информатика
Как включить калькулятор? пжпжпжпжп срочно даю 426384937 баллов...
1. Указать результат при работе с файлами file = open ("Input.txt", "a") file = open ("Input.txt", "w") file = open ("Input.txt", "r" ) Открывает файл...
Пользователь, перемещаясь из одного каталога в другой, последовательно посетил каталоги LESSONS, CLASS, SCHOOL, D:\ , MYDOC, LETTERS. При каждом перем...
Помогите очень надо!!!!!! 1. Закончите предложение: «Алгоритмом называется …» нумерованный список маркированный список система команд исполнител...
Переведите пожалуйста: 24 576 битов в Байты и Килобайты; 2048 Байтов в биты и Килобайты; 1,5 Кб в Байты и биты; 2 в степени 13 битов в Байты и Килобай...