 Найти Min и Max на интервале |
Прочтите прежде чем задавать вопрос!
1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code].
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!
  |
| 4eloveK |
 29.03.2009 2:14
Сообщение
#1
|
|
Группа: Пользователи Сообщений: 2 Пол: Мужской Репутация:  0   |
Помогите с задачей плиз.
Даны числа a,b(0<a<b) и набор из десяти элементов. Найти минимальный1| максимальный2 из элементов, содержащихся в интервале (a, b). Если требуемые элементы отсутствуют, то вывести -1. |
   |
 
|
| Lapp |
29.03.2009 6:53
Сообщение
#2
|
 Уникум  Группа: Модераторы Сообщений: 6 823 Пол: Мужской Реальное имя: Лопáрь (Андрей) Репутация: 159 |
Цитата(4eloveK @ 29.03.2009 2:14)  Помогите с задачей плиз. Поможем, оч ем речь! Не надо предварительных разговоров - сразу выкладывай, с чем возникли проблемы в твоей программе - и мы сразу поможем  -------------------- я - ветер, я северный холодный ветер
я час расставанья, я год возвращенья домой |
|
|
|
| 4eloveK |
29.03.2009 14:19
Сообщение
#3
|
|||
|
Группа: Пользователи Сообщений: 2 Пол: Мужской Репутация: 0 |
Min max нахожу а вот как с интервалами быть поясните плиз хотя бы коментами.
uses crt;
var
mas:array[1..12]of integer;
a,b,min,max,i:integer;
begin
writeln('Введите a и b');
readln(a,b);
mas[1]:=a;
mas[12]:=b;
min:=mas[1];
randomize;
for i:=2 to 11 do
begin
mas[i]:=random(9);
writeln(mas[i]);
end;
for i:=1 to 10 do
if min<mas[i] then
begin
min:=mas[i]
end;
max:=mas[1];
for i:=1 to 10 do
if max>mas[i] then
begin
max:=mas[i];
end;
writeln ('MAX ',max);
writeln('MIN ',min);
end.
|
|||
|
|
|
|||
| amega |
29.03.2009 14:36
Сообщение
#4
|
 ? Группа: Пользователи Сообщений: 283 Пол: Мужской Репутация: 4 |
а интервал можно задать множеством, и потом проверять является ли чилов в этом множестве да и все
|
|
|
|
| TarasBer |
29.03.2009 17:05
Сообщение
#5
|
 Злостный любитель Группа: Пользователи Сообщений: 1 755 Пол: Мужской Репутация: 62 |
1. min:=mas[1]; делается почему-то ДО иннициализации массива.
2. тогда уж элементы проверять не с первого надо, а со второго. 3. проверка для минимума и максимума перепутана - у вас они наоборот. -------------------- |
|
|
|
|
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0
|
Текстовая версия | 20.07.2025 4:01 |