Cкорее всего, выдается ошибка, что не найдена перегруженная функция для такого набора параметров. Параметры функции:
1ый - Строка. Заголовок окна
2ой -
Строка. Подсказка (это текст перед полем ввода)
3ий - Переменная (у тебя д.б. типа
Double или что-то типа того)
Возвращаемое значение (у тебя д.б. опять же типа
Double).
Код:
var
a1_del, f : Double;
begin
a1_del := 4.39999999960;
f : InputBox('Округлите значение','Значение:',a1_del);