[ViNT]

function inttostr(inttostr:integer):string;
begin
end;
function round(x:real):integer;
begin
end;

Это прямо так и написано в коде?
Так первая всегда будет давать 0 (точнее, неопределенное значение), а вторая ''.

Или функции всетаки как-то описаны?