Покой – это ложь; есть только страсть.
Через страсть я познаю силу.
Через силу я познаю власть.
Через власть я познаю победу.
Через победу мои оковы рвутся.
Кодекс ситов
Дрю Карпишин, Трилогия Дарта Бэйна





Сколько глобус ни крути, там Fess-Style не найти...
Сайт Fess'a » ЕГЭ Задача С2 - Средний балл учащихся - Форум
[ Новые сообщения · Участники · Правила форума · Поиск ]
Страница 1 из 11
Форум » Программирование » Паскаль » ЕГЭ Задача С2 - Средний балл учащихся
ЕГЭ Задача С2 - Средний балл учащихся
FessДата: Среда, 17.04.2013, 18:16 | Сообщение # 1

Добрый админ
Сообщений: 2338
Статус:
В этой программе нужно найти все числа в массиве, которые делятся на 3 без остатка, а затем посчитать среднее арифметическое этих чисел.



Прикрепления: 5218621.png(2Kb)
 
DarthVaderДата: Понедельник, 03.06.2013, 04:26 | Сообщение # 2

Авы нет

Группа: Удаленные





По первому варианту:
1.
Цитата (Fess)
for h:=0 to h-1

Нерабочий фрагмент кода. Скорее всего, имелось ввиду

Цитата (Fess)
for i:=0 to h-1


По второму варианту всё ок.


Сообщение отредактировал DarthVader - Понедельник, 03.06.2013, 04:35
 
FessДата: Понедельник, 03.06.2013, 21:40 | Сообщение # 3

Добрый админ
Сообщений: 2338
Статус:
Цитата (DarthVader)

Нерабочий фрагмент кода. Скорее всего, имелось ввиду

Цитата (Цитата (Fess))

for i:=0 to h-1

Нет, код совершенно правильный, имелось в виду именно for h:=0 to h-1
Попробуй измени на i и посмотри на сумасшедшее число, который тебе будет выводить скрипт)
 
DarthVaderДата: Понедельник, 03.06.2013, 22:51 | Сообщение # 4

Авы нет

Группа: Удаленные





Но тогда программа просто зациклится. При обращении к h-1 h уже равно нулю (присваивание произошло только что), и, соответственно, h-1=-1. А если выполнять цикл от нуля до минус единицы, то конца этому не будет)
Я в предыдущем посте не учёл только одного:

Код
for i:=0 to h-1 do
    sum:=sum + R[i];[/i]

Вот так всё будет работать правильно.
 
Форум » Программирование » Паскаль » ЕГЭ Задача С2 - Средний балл учащихся
Страница 1 из 11
Поиск: