При выборе места строительства жилого комплекса при металлургическом комбинате необходимо учитывать "розу ветров" (следует расположить жилой комплекс так, чтобы частота ветра со стороны металлургического комбината была бы минимальной). Для этого в течение года проводилась регистрация направления ветра в районе строительства. Данные представлены в виде массива, в котором направление ветра за каждый день кодируется след. образом: 1 - северный, 2 - южный, 3 - восточный, 4 - западный, 5 - северо-западный, 6 - северо-восточный, 7 - юго-западный, 8 - юго-восточный. Определить, как должен быть расположен жилой комплекс по отношению к комбинату.

Question

Информатика

Лана

19 июня, 13:54

При выборе места строительства жилого комплекса при металлургическом комбинате необходимо учитывать "розу ветров" (следует расположить жилой комплекс так, чтобы частота ветра со стороны металлургического комбината была бы минимальной). Для этого в течение года проводилась регистрация направления ветра в районе строительства. Данные представлены в виде массива, в котором направление ветра за каждый день кодируется след. образом: 1 - северный, 2 - южный, 3 - восточный, 4 - западный, 5 - северо-западный, 6 - северо-восточный, 7 - юго-западный, 8 - юго-восточный. Определить, как должен быть расположен жилой комплекс по отношению к комбинату.

+4

Ответы (1)

Знаете ответ?

Лина · Answer 1

Var D : array[1 ... 365] of Byte; {начальные данные}

M : array[1 ... 8] of Word; ... For i:=1 to 8 do M[i]:=0; For i:=1 to 365 do Inc (M[D[i]]) ; Min:=1; For i:=2 to 8 do If M[i]
Мб подойдет, надо на паскале проверять. Если ты просил массив в паскале