Максимум суммы 2 элементов

[TwiX]

Напиши сначала что у тебя в edit'е находится, и что ты пытаешься из него выкопать.

[Siluet]

в edit я ввожу массив через пробел
допустим: 4 6 7 4 8 3 1 9 5 3

[Вавел из ГМТУ]

1. Найди минимальное значение.
2. Найти максимальное.
3. Сложить.

Какие проблемы?

[Siluet]

необходимо найти 2 максисмума и сложить их

[Вавел из ГМТУ]

допустим: 4 6 7 4 8 3 1 9 5 3

Тут нет двух максимумов

Тогда просто надо ещё запоминать предыдущий максимум....

[TwiX]

Бла, ко мне друзья пришли с пивом xD
Не дописал чуток)

var
  sa, pre:string;
  i, a:integer;
  ar:array[1..100] of integer;
m1,m2,maximum:integer;
begin
    pre:=edit1.Text;
    a:=1;
    for i := 1 to Length(pre) do
      begin
        sa:='';
        if pre[i]<>' ' then
        begin
          sa:=sa+pre[i];
        end
        else
        begin
          ar[a]:=StrToInt(sa);

          a:=a+1;
          sa:='';
        end;
end;
end;

чего не изменяется sa при sa:=sa+pre[i]
Разберёшься чей)
Принцип вроде понятен