UA
Публиковать
Email
Регистрация
Вход
UA
Регистрация
Вход
Регистрация
Вход
Primat.Org
15 лет
прикладная математика
Главная
Статьи
Библиотека
Файлы
Полезно
Форум
{
UA
}
Архив
Блок-схемы
Паскаль
Python
C++
MathPad
f(x)
Задачи
Решение квадратного уравнения
program reshenie_kwadr_lin_uravneniy; {Решение уравнения a*x*x+b*x+c=0} uses crt; var a,b,c,d,x1,x2:real; Begin clrscr; writeln ('Введите коэффициенты'); write ('a=');readln (a); write ('b=');readln (b); write ('c=');readln (c); if (a=0) and (b=0) and (c=0) then writeln('Корней бесконечно много') else if (a=0) and (b=0) and (c<>0) then writeln ('Корней нет') else if (a=0) and (b<>0) then begin writeln ('Линейное уравнение'); x1:=-c/b; writeln('x=',x1:4:2); end else {Решение квадратного уравнения} begin d:=sqr(b)-4*a*c; if d<0 then writeln ('Действительных корней нет!') else if d=0 then begin x1:=-b/(2*a); writeln('x=',x1:4:2); end else begin x1:=(-b+sqrt(d))/(2*a); x2:=(-b-sqrt(d))/(2*a); writeln ('x1=',x1:4:2, ' x2=',x2:4:2); end end; readln End.
1
2
3
4
5
Оценка -
1.0
(
10
)
2010-08-18 • Просмотров [ 1874 ]
Новые сообщения
Компьютерные игры как бизнес
Смартфоны Vivo vs OnePlus: метод исключе...
SMS для бизнеса. Что надо знать разработ...
Как выбрать спецодежду, чтобы было удобн...
Сравнение IT-специальностей для абитурие...
Стресс тест ИТ-структуры на взлом и прон...
Как компьютер помогает экономить в пчело...
Парсер интернет магазинов: 5 главных фун...
Охрана жилья и сочетание классической си...
Парсеры на примере курсов валют и золота
Все сообщения
Новое в библиотеке
Проблемы изучения математики в 3 кла...
Проверить будет ли число простым - P...
Сумма цифр числа в Python
Пузырьковая сортировка в Python
Алгоритм Эвклида для НОД в Python
Все материалы библиотеки
Лучшее на сайте
Онлайн-решебник задач
MathPad -математический блокнот
LaTeX+MarkDown редактор формул
Универсальный калькулятор
Числовой калькулятор
Сфоткай и добавь свою задачу
Решения задач из Сканави
Характеристика студента онлайн
Диаграммы и графики онлайн
Конструктор программ на Паскале
Самые популярные материалы
Доска почета: лучшие пользователи
Анекдоты и фразы
"Коктейль рекурсия: 20% спирта, 30% воды, 50% коктейля «Рекурсия»... "