Войти
Регистрация
Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Показать больше
Показать меньше
vladusha2
01.08.2022 15:47 •
Информатика
Составьте алгоритм квадратного уравнения,,
Показать ответ
Ответ:
оаилпаидшп
06.10.2020 16:07
Var
a, b, c, d: real;
begin
readln(a, b, c);
if a = 0 then begin
if b = 0 then
writeln('х может быть любым')
else
writeln('x = ', c / -b);
exit;
end;
d := (b * b) - 4 * a * c;
if d < 0 then begin
writeln('Комплексные корни');
exit;
end;
writeln('x1 = ', -b + sqrt(d) / (2 * a));
writeln('x2 = ', -b - sqrt(d) / (2 * a));
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
kirillanisimovp08nm9
25.05.2022 09:55
Решите . вы хотите работать с разрешением монитора 1600х1200 пикселей, используя 16 777 216 цветов. в магазине видеокарты с памятью 512кбайт, 2мбайт, 4мбайт, 64мбайт. какую из них...
димитриусис
10.08.2020 19:30
:разработать алгоритм и изобразить его в виде блок-схемы. пользователь вводит с клавиатуры n чисел. определить номер максимального по модулю элемента, выдав сообщение вида “максимальный...
dianacat1017
09.01.2021 14:57
Дана программа для исполнителя Редактор: НАЧАЛО ПОКА нашлось (222) ИЛИ нашлось (888) ЕСЛИ нашлось (222) ТО заменить (222, 8) ИНАЧЕ заменить (888, 2) КОНЕЦ ЕСЛИ КОНЕЦ ПОКА КОНЕЦ Какая...
хых6
16.09.2021 22:01
за решение всех номеров...
guzel32211
06.04.2020 15:12
Составить линейный алгоритм вычисления у по формуле: y= 6x (x + 2) – (x + 4), при x = 2...
tambovtsevanat
26.01.2022 16:09
Сочинение вид из моего окна по плану 1. удивительный вид из окна 2. описание поздней зимней природы 3. общее впечатление 7-12 предложений...
sgjisgop
29.10.2021 08:54
Якому з електроскопів надано найменший, а якому найбільший заряд? Яким може бути знак цього заряду?...
apomat1234
17.01.2020 05:52
Определите, о каком разрядке местоимений идёт речь? указывают на лица, которые участвуют в речи – выполняют функции связи частей сложного предложения – указывают на отсутствие предметов,...
Даня22202
01.04.2023 13:34
5. Установіть відповідність. Іншомовне слово Власне українське слово1 толерантний А останній2 синхронний Б терпимий3 абсолютний В цілковитий4 гіпотетичний Г одночаснийД припущений6....
dbd2
09.02.2022 00:21
2-тапсырма: Топтастыру әдісіШәкірттің ойы қандай?...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
a, b, c, d: real;
begin
readln(a, b, c);
if a = 0 then begin
if b = 0 then
writeln('х может быть любым')
else
writeln('x = ', c / -b);
exit;
end;
d := (b * b) - 4 * a * c;
if d < 0 then begin
writeln('Комплексные корни');
exit;
end;
writeln('x1 = ', -b + sqrt(d) / (2 * a));
writeln('x2 = ', -b - sqrt(d) / (2 * a));
end.