и чему вас в школе учат
бедолаги как жить то будете ?
строка массива ? наверное имеется ввиду ЭЛЕМЕНТ массива ?
Код:
function TEST(A:array[1..10] of integer,k:Integer):Boolean;
begin
Result:=false;
if k>10 then exit;
if ((k=10) AND (A[10]=a[1])) OR ((k<10) AND (A[k]=a[k+1])) then Result:=true;
end;