Индикатор выполнения ПР 205

[EFrol]

А вот так можно? Дядя не заругает?
Owen.jpg

function Progress: real;
    var_input
        Value, Min, Max : real;
    end_var
   
    Progress := 1000.0 * (Value - Min) /(Max - Min);
    
end_function

У индикатора Min = 0, а Max = 1000, переменная Progress