Определить номер наименьшего из значений выражения

[vadiprog]

http://s017.radikal.ru/i437/1111/d1/81701f07b6c8.png
C[i] и A[i] это 2 разных массива.
Написать нужно на Делфи.
Я уже написал процедуры и функции которые будут заполнять эти массивы...

[vadiprog]

"e" это экспонента

[IT-man]

k:=1;
for i:=2 to n do
if (sqrt(exp(c[i]))-sqr(a[i])>(sqrt(exp(c[k]))-sqr(a[k]) then k:=i;
{в  K будет искомый номер}

[vadiprog]

Сообщение от IT-man

k:=1;
for i:=2 to n do
if (sqrt(exp(c[i]))-sqr(a[i])>(sqrt(exp(c[k]))-sqr(a[k]) then k:=i;
{в  K будет искомый номер}

а что і начинается с 2? почему не с 1?

[IT-man]

а что і начинается с 2? почему не с 1?

Потому что 1 по умолчанию выбран минимумом