Массивы в Турбо Паскале

Сейчас на форуме: vsv1 (+3 невидимых)

Посл.ответ	Сообщение
N_E_O Ранг: 23.6 (новичок) Активность: 0.03↘0 Статус: Участник	Создано: 05 марта 2008 15:29 · Личное сообщение · #1 Существует две задачи: 1) Заполнить массив так, чтобы его элементы содержали геометрическую прогрессию (1, 2, 4, 8...). 2) Определить сумму чётных и сумму нечётных элементов массива. Подскажите в каком направление действовать? Заранее огромное спасибо!

Isaev Ранг: 756.3 (! !), 113thx Активность: 0.61↘0.05 Статус: Участник Student	Создано: 05 марта 2008 17:03 · Личное сообщение · #2 N_E_O не в тему! С такими вопросами сюда: delphikingdom.com/ ----- z+Dw7uLu5+jqLCDq7vLu8PvpIPHs7uMh
Archer Ранг: 2014.5 (!!!!), 1278thx Активность: 1.34↘0.25 Статус: Модератор retired	Создано: 05 марта 2008 17:07 · Поправил: Archer · Личное сообщение · #3 Эээ, а в чём тут сложность то? arr[0]:=1; for i:=1 to N-1 do arr[i]:=arr[i-1]*2; sum:=0; for i:=0 to N-1 step 2 do sum:=sum+arr[i]; Ну как-то так, если синтаксис не напутал, давно кодил. В чём тут сложность-вообще непонятно. Как это относиццо к данному форуму, тоже неясно, посему закрыто.

Для печати