[Pyro]

PHP код:

function skolko(list: TStrings; skonca: byte = 10): Integer;
var i: integer;
begin
  result := 0;
  for i := 1 to skonca do
    if list.count - i >= 0 then
      result := result + strtointdef( list[list.count - i], 0);
end;