Форум программистов, компьютерный форум, киберфорум
Наши страницы
Turbo Pascal
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.67/3: Рейтинг темы: голосов - 3, средняя оценка - 4.67
Byrone
1 / 1 / 0
Регистрация: 17.10.2010
Сообщений: 115
#1

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

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

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

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

Составить программу решения неравенства
нужно написать блок схему и текст программы turbo pascal!!!кто может кому не...

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

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

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

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

3
WatsOne
36 / 37 / 13
Регистрация: 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
Модератор
54352 / 41944 / 28977
Регистрация: 18.05.2008
Сообщений: 98,803
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
Нарисуйте блок-схему решения неравенства ax + b больше или равно 0

Нарисуйте блок-схему алгоритма решения неравенства, зависящего от параметров a и b
Нарисуйте блок-схему алгоритма решения неравенства, зависящего от параметров a...

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


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

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

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