Отправляет email-рассылки с помощью сервиса Sendsay
  Все выпуски  

RusFAQ.ru: Программирование на языке Pascal


Информационный Канал Subscribe.Ru


RusFAQ.ru: Программирование на языке Pascal

Выпуск № 157
от 08.06.2003, 03:00

Администратор:
Имя: Sensey
URL: Информационный ресурс
ICQ: 105679124
Украина, Харьков
О рассылке:
Задано вопросов: 282
Отправлено ответов: 982
Активность: 348.2 %
[Задать вопрос >>][Регистрация эксперта >>]
[Поиск в базе][Обсудить на форуме]


 Список экспертов, ответы которых опубликованы в данном выпуске

ART_43
Статус: Начальный
Общий рейтинг: 117.24
[Подробней >>]
Byter
Статус: Опытный
Общий рейтинг: 123.6
[Подробней >>]
Дмитрий
Статус: Опытный
Общий рейтинг: 148.8
[Подробней >>]
 
Tibor
Статус: Начальный
Общий рейтинг: 166.66
[Подробней >>]
[MozgC]
Статус: Профессиональный
Общий рейтинг: 170
[Подробней >>]
Tancho
Статус: Опытный
Общий рейтинг: 152.65
[Подробней >>]
 
Bill
Статус: Доверительный
Общий рейтинг: 181.66
[Подробней >>]
Tigran K. Kalaidjian
Статус: Опытный
Общий рейтинг: 117.64
URL: Методы оптимизации работы ПК
[Подробней >>]


 Краткий перечень вопросов

Вопрос № 273. Приветствую Вас, уважаемые эксперты. Пишу программу на Делфи, а вопрос возник чисто :) Паскалевский.... (ответов: 8)
Вопрос № 274. Здравствуйте Tigran K. Kalaidjian ! Вы говорите поменять режим LPT порта с EPP на Normal, но Normal ... (ответов: 1)

Вопросов: 2, ответов: 9


 Вопрос № 273

Приветствую Вас, уважаемые эксперты. Пишу программу на
Делфи, а вопрос возник чисто :) Паскалевский. В общем
надо написать программу вида: пользователь вводит с
клавиатуры некоторые числа, они записываются в массив.
После завершения ввода нужно найти самый большой или
самый маленький элемент массива. Подскажите мне ход
мыслей для нахождения этого элемента, а я уж как-нибудь
дальше сам. Всем заранее огромное спасибо за ответы !!!



Вопрос отправлен: 04.06.2003, 11:12
Отправитель: SATAN aka NAPALM

[Следующий вопрос >>] [Список вопросов]

Отвечает ART_43

Приветствую Вас, SATAN aka NAPALM!
Если массив не сортированный, то простым сканированием.

Приложение:

Ответ отправлен: 04.06.2003, 12:22
Отправитель: ART_43


Отвечает Byter

Добрый день, SATAN aka NAPALM!
Можно искать самый большой элемент еще при вводе массива!!!
Просто сравниваешь вновь введенный элементс самым больши из предидущих.И если он(новичок) больше, то сохраняем его, как самый большой из предидущих( можно еще сохранить какой он по счеьу!). В конце ввода выводишь сохраненный элемент.
Кусок примера в приложении.

Приложение:

Ответ отправлен: 04.06.2003, 12:06
Отправитель: Byter


Отвечает Дмитрий

Приветствую Вас, SATAN aka NAPALM!
Прежположи, что max равно первому элементу массива. Далее перебирай все элементы массива. И если какой-либо из них больше max, приравняй max этому элементу. Послетого, как ты пройдешь весь массив, у тебя в переменной max окажется максимальное значение массива. И будь внимательней с приведением типов при сравнении.


Ответ отправлен: 05.06.2003, 08:50
Отправитель: Дмитрий


Отвечает Tibor

Я блин не понимаю, зачем нужно идти учиться если сам не можеш такой элементарной задачи решить.
И сдругой стороны я не понимаю, зачем давать своим учиникам то, что им совсем ненужно, учитывая
специальность.
И если уж ты решил, что здесь тебе помогут решить эту задачу, то пиши конкретнее.

Ответ отправлен: 05.06.2003, 14:04
Отправитель: Tibor


Отвечает [MozgC]

После заполнения массива, делаешь цикл со второго до последнего элемента. Сначала специальной переменной max присваиваешь значение первого элемента масисва (это еще до начала цикла) В цикле сравниваешь эту переменную с элементом массива и если элемент массива больше это переменной приравниваешь переменную к элементу массива. В конце цикла max будет содержать наибольший элемент.

Ответ отправлен: 04.06.2003, 12:32
Отправитель: [MozgC]


Отвечает Tancho

Здравствуйте, SATAN aka NAPALM!
Твой вопрос относиться к методом отсортирования - их куча:
1) Такие которые сортировать для самое короткое время;
2) Такие которые занимаеть самая малая обема памяти;
Но правда тебе нужна не целая сортировка, а ее маленькая часть - отыскания самого большой( меньший) елемент, для это подходить следущий цикл :
for i := 1 to n-1 do
if a[i] > a[i+1] then
begin
x := a[i];
a[i] := a[i+1];
a[i+1] := x
end.
В конце в a[n] находится самый большой елемент массива a!




Ответ отправлен: 04.06.2003, 13:02
Отправитель: Tancho


Отвечает Bill

Доброе время суток, SATAN aka NAPALM!
Это же элементарно, Ватсон. См. приложение:


Приложение:

Ответ отправлен: 04.06.2003, 14:38
Отправитель: Bill


Отвечает Tigran K. Kalaidjian

Доброе время суток, SATAN aka NAPALM!
А Вы пишете консольный вариант или что ?
Для консольного варианта программа в приложении.

Приложение:

Ответ отправлен: 04.06.2003, 16:49
Отправитель: Tigran K. Kalaidjian


 Вопрос № 274

Здравствуйте Tigran K. Kalaidjian !
Вы говорите поменять режим LPT порта с EPP на Normal, но Normal это же SPP то есть однонаправленный режим. А мне нужно подавать сигнал в компьютер.
И причем здесь вход BUSY, я не понял. Сигнал я подаю на информационные «ноги» (2 – 9), переводя их в режим приема информации, при этом мониторе высвечивается число 255, то есть на все входы подан сигнал. А замыканием одной из информационных «ног» с общим, число соответственно уменьшается, то есть сигнал на эту «ногу» не подается.
LPT – портов в системе я скорее всего 4. ОС в техникуме на логическом диске C - Windows 98, насчет SE не знаю, не смотрел, но думаю это неважно, а на диске D – Windows XP Pro. У меня ОСы следующие: на диске C – Windows ME, а на D – Windows XP Pro.
Да, кстати в техникуме на другом компе режимы порта странные: EPP 1.7 и EPP 1.9. Которые тоже не работают.



Вопрос отправлен: 04.06.2003, 23:11
Отправитель: Константин

[Следующий вопрос >>] [Список вопросов]

Отвечает Tigran K. Kalaidjian

Приветствую Вас, Константин!
Вот оно что!
Вы исползуете двунаправленный режим и ноги [2-9], а я - однонаправленный и ноги [10-13, 15].
Возможно, что в техникуме, как и у меня, нет поддержки двунаправленки, поэтому используйте указанные выше ноги и порт 379h - это уж работает везде.
И не забудьте, что вход BUSY(PIN11) инвертирован (при посылке сигнала - нуль).
Если возникнут вопросы, пишите на kalaidjian@pochtamt.ru


Ответ отправлен: 05.06.2003, 09:14
Отправитель: Tigran K. Kalaidjian



Форма отправки вопроса

Внимание!
Мы рекомендуем открывать рассылку в программе Internet Explorer 5.0+ или отправлять вопросы с сайта по адресу: http://rusfaq.ru/cgi-bin/Message.cgi.

(C) 2002-2003 Команда RusFAQ.ru.

 Персональные данные

Ваше имя:

Ваш e-mail:

Опубликовать мой e-mail в рассылке


 Вопрос и дополнение

Ваш вопрос:


Приложение (если необходимо):


Получить ответов:


 Выбор рассылки

Программисту
Assembler (36)
C / C++ (30)
Perl (7)
Builder / Delphi (19)
Pascal (30)
Basic / VBA (12)
Java / JavaScript (12)
PHP (8)
MySQL / MSSQL (7)
Пользователю
Windows 95/98/Me (37)
Windows NT/2000/XP (32)
"Железо" (27)
Поиск информации (15)
Администратору
Windows NT/2000/XP (15)
Linux / Unix (9)
Юристу
Гражданское право (5)
Семейное право (2)
Трудовое право (3)
КоАП (3)

Отправить вопрос всем экспертам выбранной рассылки.




Задать вопрос | Регистрация эксперта | Поиск в базе | Чат | Форумы | Новости
Проект экспертов RusFAQ.ru | Фотоальбом | Virus.RusFAQ.ru | Администрирование


Яндекс цитирования
© 2001-2003 Россия, Москва. Авторское право: Калашников О.А.

http://subscribe.ru/
E-mail: ask@subscribe.ru
Отписаться
Убрать рекламу

В избранное