Версия для печати темы

Нажмите сюда для просмотра этой темы в обычном формате

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

Автор: hasan 17.12.2009 1:09

Известно количество совершенных преступленний в каждом из 5 городов в текущем и предыдущем городах.Определить город(города), в котором количество преступлений увеличилось в максимальное число раз и какое.Название городов известны.
Помогите решить пожалуйста)))))

Автор: Unconnected 17.12.2009 1:24

Цитата
Известно количество совершенных преступленний в каждом из 5 городов в текущем и предыдущем городах.


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

Автор: Гость 17.12.2009 2:17

Цитата(Unconnected @ 16.12.2009 21:24) *

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

да дословный

Автор: volvo 17.12.2009 2:45

Цитата
Известно количество совершенных преступленний в каждом из 5 городов в текущем и предыдущем городах
Выделенное не лишнее? Может, ГОДАХ все-же?

Автор: Гость 17.12.2009 2:51

Цитата(volvo @ 16.12.2009 22:45) *

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

да в годах yes2.gif ,при наборе ошибся.

Автор: Lapp 17.12.2009 5: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],'.');

Автор: Гость 17.12.2009 18:16

Цитата(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],'.');


большое спасибо smile.gif

Автор: Гость 24.05.2011 2:16

Цитата(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],'.');



а какие типы данных тут присутствуют? m,n,i:integer, a "Crimes" ?