Объясните задачу (Delphi)

[Sianessa]

В общем нужно решить задачу на многомерные массивы:

Даны действительные числа a1,...a20. Получить числа b1,...b20, где bi - среднее арифметическое всех членов последовательности a1,..a20, кроме ai (i=1, 2,...,20).

Вот.
В общем программа должна быть через обычное Application. Только одно НО: числа должны вводиться вручную.
Проблема в том, что не могу понять до конца смысл задачи, и в связи с этим весьма смутные представления о её решении.

[Sazary]

Ну пусть есть массив a, забитый числами от 1 до 20.
Каждый член b[i] равен среднему арифметическому массива a, но без члена a[i].
То есть b[3] равен (1+2+4+5+6+...+20)/19;

[Sianessa]

Sazary, э-э...
Ну я как бы понимаю, а как сие в виде цикла то записать? делиться то всегда будет на 19?
И прописывать то надо будет с помощью переменных и цикла... И я как-то слабо себе это представляю... Цикл как я понимаю, for...?

[__STDC__]

всегда на 19, т.к. один элемент исключается... Может что-то вроде такого..

for i:=1 to 20 do begin
   for j:=1 to 20 do 
      if (i<>j) then b[i]:=b[i]+a[j];
   b[i]:=b[i]/19;
end;

[Sazary]

Примерно так:

for i:=1 to n do
 begin
 b[i] := 0;
 for j:=1 to n do
  if j<>i then b[i] := b[i] + a[j];
 b[i] := b[i]/(n-1);
 end;

Опоздал чуток.

[__STDC__]

да, у Sazary более правильный вариант, у меня для жестко фиксированного кол-ва эл-тов...
Только там не a[i], а a[j]

[Sianessa]

__STDC__, Sazary, спасибо, картина уже намного яснее
Ушла писать код...
Далеко не уходите
И... Не могли бы вы подсказать, как можно сделать ввод чисел вручную?

[__STDC__]

в делфи или паскале?
если консольная программа то read или readln...

for i:=1 to 20 do
   readln(a[i]);

[Sianessa]

Неет... В Delphi.
Через обычную стандартную Form1 типа Application.
Кароче нужна функция на подобие бэйсиковского InputBox... наверное...
В общем все элементы должны вводиться вручную...
А потом выводиться обе последовательности =__= на подобие MsgBox...
Бэйсик я ещё нормально более ли менее понимаю, а вот с Делфи сейчас какие-то траблы пошли...

[__STDC__]

А нельзя с этого.. как его... TextEdit`a что ли вводить? там поле такое... я честно говоря в делфи уже не работаю несколько лет, не помню как там называются компоненты)) Такое поле для ввода и кнопку...