How does this piece of code work in Delphi?

Question

Delphi

In this function, the penultimate line is not clear.
function max(x:mas):real;
vars:real;
i:integer;
begin s:=abs(x[1]);
for i:=2 to 4 do
if abs(x[i])>s
then s:=abs(x[i]);
max:=s;
end;

Answer 1

this string contains the name of the function. that is, the result that the function should return. it is also allowed to use the result variable.