Форум программистов, компьютерный форум, киберфорум
Наши страницы

Turbo Pascal

Войти
Регистрация
Восстановить пароль
 
Byrone
1 / 1 / 0
Регистрация: 17.10.2010
Сообщений: 115
#1

Напишите программу решения неравенства - Turbo Pascal

21.10.2010, 13:30. Просмотров 600. Ответов 3
Метки нет (Все метки)

напишите программу решения неравенства (x-a)(x-b)<=0

<= меньше или равно
помогите =( у меня с математикой плохо =(
0
Лучшие ответы (1)
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
21.10.2010, 13:30
Я подобрал для вас темы с готовыми решениями и ответами на вопрос Напишите программу решения неравенства (Turbo Pascal):

Составить программу решения неравенства - Turbo Pascal
нужно написать блок схему и текст программы turbo pascal!!!кто может кому не сложно пожалуйста помогите(а то сессию боюсь не пройду токо...

Составить программу решения линейного неравенства - Turbo Pascal
Составить программу решения линейного неравенства ax&lt;b.

Напишите программу для решения ребуса : ЛОБ + ТРИ = САМ - Turbo Pascal
Напишите программу для решения ребуса : ЛОБ + ТРИ = САМ

Найти все целочисленные решения неравенства - Turbo Pascal
Найти все целочисленные решения неравенства x^2-4*x*y+y^2&lt;100. Помогите пожалуйста((

Нарисуйте блок-схему решения неравенства ax + b < 0 - Turbo Pascal
Нарисуйте блок-схему решения неравенства ax + b &lt; 0

Нарисуйте блок-схему решения неравенства ax + b больше или равно 0 - Turbo Pascal
Нарисуйте блок-схему решения неравенства ax + b больше или равно 0

3
WatsOne
36 / 37 / 3
Регистрация: 10.10.2010
Сообщений: 115
21.10.2010, 13:32 #2
так тебе помочь программу надо написать, или с математикой помочь?

решением будет x<=a ИЛИ x<=b
0
Byrone
1 / 1 / 0
Регистрация: 17.10.2010
Сообщений: 115
21.10.2010, 13:35  [ТС] #3
произведение равно 0 если 1 из множителей равен нулю?
я просто не знаю как начать такую программу, сам алгоритм
она должна считать промежуток решения?
0
Puporev
Модератор
54023 / 41656 / 14733
Регистрация: 18.05.2008
Сообщений: 97,933
21.10.2010, 16:36 #4
Лучший ответ Сообщение было отмечено автором темы, экспертом или модератором как ответ
Вроде так. Условие выполняется если x=a,x=b или x-a, x-b имеют разный знак.
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
uses crt;
var a,b:real;
begin
clrscr;
writeln('Решение неравенства (x-a)(x-b)<=0');
writeln('Введите значения a,b:');
readln(a,b);
if a>b then write(b:0:1,'<=x<=',a:0:1)
else if a<b then write(a:0:1,'<=x<=',b:0:1)
else write('x=',a:0:1);
readln
end.
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
21.10.2010, 16:36
Привет! Вот еще темы с ответами:

Нарисуйте блок-схему решения неравенства ax + b меньше или равно 0 - Pascal
Нарисуйте блок-схему решения неравенства ax + b меньше или равно 0

Нарисуйте блок-схему алгоритма решения неравенства, зависящего от параметров a и b - Pascal
Нарисуйте блок-схему алгоритма решения неравенства, зависящего от параметров a и b – заданных вещественных чисел: (x − a)(x − b) &gt; 0

Напишите модуль решения уравнений первой и второй степени - Turbo Pascal
Напишите модуль решения уравнений первой и второй степени.Модуль должен содержать функцию решения линейного уравнения ax+b=0 и квадратного...

Напишите в словесной форме алгоритм решения следующей задачи: - Pascal
Напишите в словесной форме алгоритм решения следующей задачи: Составить алгоритм, определяющий имеется ли среди чисел a,b,c хотя бы...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
4
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru