Задание

Определите, какое значение вернёт функция при вызове её как f\(' МЭШ2023 '\):

function f\(str: string\): Integer;
var
i, Res: Integer;
begin
Res := 0;
for i := 1 to Length\(str\) do begin
if str

\[i\]
in
\['0'\.\.'9'\]
then
Res := Res + StrToInt\(str⟨0⟩\);
end;
f := Res;
end;