Решение массивов - Форум «Всё о Паскале»

Форум «Всё о Паскале» > Pascal, Object Pascal > Задачи

Прочтите прежде чем задавать вопрос!

1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code].
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!

Решение массивов

Опции

hasan	16.12.2009 21:09 Сообщение #1
Группа: Пользователи Сообщений: 2 Пол: Мужской Реальное имя: Алекей Репутация: 0	Известно количество совершенных преступленний в каждом из 5 городов в текущем и предыдущем городах.Определить город(города), в котором количество преступлений увеличилось в максимальное число раз и какое.Название городов известны. Помогите решить пожалуйста)))))

Ответов

Lapp	17.12.2009 1:17 Сообщение #2
Уникум Группа: Модераторы Сообщений: 6 823 Пол: Мужской Реальное имя: Лопáрь (Андрей) Репутация: 159	Попробуй примерно так: m:=1; for i:=2 to n do if Crimes09[i]/Crimes08[i]>Crimes09[m]/Crimes08[m] then m:=i; WriteLn('Maximum crime rate increase of ',Crimes09[m]/Crimes08[m]: 5:2,' times, has been observed in ',Town[m],'.'); -------------------- я - ветер, я северный холодный ветер я час расставанья, я год возвращенья домой

Гость	17.12.2009 14:16 Сообщение #3
Гость	Цитата(Lapp @ 17.12.2009 1:17) Попробуй примерно так: m:=1; for i:=2 to n do if Crimes09[i]/Crimes08[i]>Crimes09[m]/Crimes08[m] then m:=i; WriteLn('Maximum crime rate increase of ',Crimes09[m]/Crimes08[m]: 5:2,' times, has been observed in ',Town[m],'.'); большое спасибо

Сообщений в этой теме

hasan Решение массивов 16.12.2009 21:09

Unconnected Немного непонятно. Это дословный текст задачи? 16.12.2009 21:24

Гость Немного непонятно. Это дословный текст задачи? д... 16.12.2009 22:17

volvo Выделенное не лишнее? Может, ГОДАХ все-же? 16.12.2009 22:45

Гость Выделенное не лишнее? Может, ГОДАХ все-же? да в ... 16.12.2009 22:51

Lapp Попробуй примерно так: m:=1; for i:=2 to n do if ... 17.12.2009 1:17

Гость Попробуй примерно так: m:=1; for i:=2 to n do if... 17.12.2009 14:16

Гость Попробуй примерно так: m:=1; for i:=2 to n do if... 23.05.2011 22:16

« Предыдущая тема · Задачи · Следующая тема »

1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)

Пользователей: 0

Режим отображения: Переключить на: Стандартный · Переключить на: Линейный · Древовидный

Подписка на тему · Сообщить другу · Версия для печати · Подписка на этот форум

Текстовая версия

23.06.2025 12:38

Хостинг предоставлен компанией "Веб Сервис Центр" при поддержке компании "ДокЛаб"