массивы

[_Solomon_]

сейчас сижу на контрольной вылез за помощью....плиз помогите...Даны действильные s1, s2 ...s16. Получить новый массив К, элементы которого связаны с элементами соотношением (s1+ s16, s2+ s15,.., s8+ s9). Привести алгоритм и решение задачи на языке делфи

[Carbon]

А эти s1..s16 случайно не в массиве?

Если да, то

var s:array [1..16] of float;
K:array [1..8] of float;

procedure Convert;
var i:integer;
begin
for i:=1 to 8 do
K[i]:=s[i]+s[17-i]
end;

Если нет, то без массива s и не циклом, а руками.

[Carbon]

P.S.
Мне бы в универе такие задачи давали. Я бы даже с дивана не поднимался...