На процедуры, метание диска

olchik1980 · 13.03.2013, 13:57

На соревнованиях по метанию диска участвовало N учеников. Им давалось M (M<10) попыток для прыжков. Результаты записывались в таблицу, в которой каждая строка соответствует попыткам одного ученика. Победитель определяется с помощью подсчета средней арифметической от всех попыток. Определите номер участника, который победил в соревновании, если победителей больше, то выведи все их номера. Используйте функцию, в которой подсчитываются результаты каждого участника.
вх 3
2
120
140
220
250
290
456
вых 3

olchik1980 · 13.03.2013, 13:58

в паскале ABC

Vladimir_S · 13.03.2013, 14:36

А зачем метателям диска прыгать?

Валерий · 13.03.2013, 15:10

А если диск на ногу уронил?

Vladimir_S · 13.03.2013, 16:05

Цитата:

Сообщение от Валерий

А если диск на ногу уронил?

Тогда, конечно, только Паскаль АВС поможет. Или другой какой... э-э... диалект.

13.03.2013, 13:57	#1 (permalink)
olchik1980 Новичок Регистрация: 13.03.2013 Сообщений: 10 Сказал(а) спасибо: 0 Поблагодарили 0 раз(а) в 0 сообщениях Репутация: 10	На процедуры, метание диска На соревнованиях по метанию диска участвовало N учеников. Им давалось M (M<10) попыток для прыжков. Результаты записывались в таблицу, в которой каждая строка соответствует попыткам одного ученика. Победитель определяется с помощью подсчета средней арифметической от всех попыток. Определите номер участника, который победил в соревновании, если победителей больше, то выведи все их номера. Используйте функцию, в которой подсчитываются результаты каждого участника. вх 3 2 120 140 220 250 290 456 вых 3

13.03.2013, 15:10	#4 (permalink)
Валерий Member Регистрация: 11.04.2007 Адрес: Санкт-Петербург Сообщений: 40,320 Записей в дневнике: 73 Сказал(а) спасибо: 885 Поблагодарили 2,792 раз(а) в 431 сообщениях Репутация: 186775	А если диск на ногу уронил? __________________ Пингвин птица гордая, пока не пнёшь - не полетит.

13.03.2013, 13:57
Helpmaster Member Регистрация: 08.03.2016 Сообщений: 0	В похожих обсуждениях зачастую можно найти полезные ответы Подпрограммы. Процедуры и функции Pascal, процедуры Процедуры Оформление процедуры с массивами

13.03.2013, 13:58	#2 (permalink)
olchik1980 Новичок Регистрация: 13.03.2013 Сообщений: 10 Сказал(а) спасибо: 0 Поблагодарили 0 раз(а) в 0 сообщениях Репутация: 10	в паскале ABC

13.03.2013, 14:36	#3 (permalink)
Vladimir_S Специалист Регистрация: 27.08.2008 Адрес: Санкт-Петербург Сообщений: 27,807 Сказал(а) спасибо: 340 Поблагодарили 583 раз(а) в 208 сообщениях Репутация: 113184	А зачем метателям диска прыгать?

Ads
Яндекс Member Регистрация: 31.10.2006 Сообщений: 40200 Записей в дневнике: 0 Сказал(а) спасибо: 0 Поблагодарили 0 раз(а) в 0 сообщениях Репутация: 55070