Question

写一函数，实现从一维数组中寻找一指定的数，若找到，返回该数在数组中的下标值，否则返回-1。

写一函数，实现从一维数组中寻找一指定的数，若找到，返回该数在数组中的下标值，否则返回-1。

Answer 1

function find(x:integer):integer;
var
i:integer;
begin
for i:=1 to n do if a[i]=x then exit(i);
exit(-1);
end;