(math.modf(num + (num >= 0 and 0.5 or -0.5)))

   -- Округление для любого числа 
     local  rounded  =   math.floor (num  *  mult  +   0.5   * (num  >  =   0   and   1   or   -  1 )) / mult  

-- Округление для любого числа
    local rounded = math.floor(num * mult + 0.5 *(num >= 0 and 1 or -1)) / mult

print(round(12.345, 2))  -- 12.35
print(round(-12.345, 2)) -- -12.34
print(round(10.0))       -- 10
print(round(10))         -- 10
print(round(nil))        -- nil
print(round("abc"))      -- "abc"

   function   round (num, idp)
    
     -- Если num некорректное, вернуть как есть 
     if   not  num  or  type(num) ~ =   "number"   then   return  num  end 
   
     -- Если idp не указан, использовать 0 (округление до целого числа) 
    idp  =  idp  or   0  
     local  mult  =   10 ^idp

     -- Округление для любого числа 
     local  rounded  =   math.floor (num  *  mult  +   0.5 ) / mult

     -- Если число целое, убрать .0 
     if  rounded  =  =   math.floor (rounded)  then 
         return   math.floor (rounded)
     end 

     return  rounded
 end 
  

function round(num, idp)
    
    -- Если num некорректное, вернуть как есть
    if not num or type(num) ~= "number" then return num end
   
    -- Если idp не указан, использовать 0 (округление до целого числа)
    idp = idp or 0 
    local mult = 10^idp

    -- Округление для любого числа
    local rounded = math.floor(num * mult + 0.5) / mult

    -- Если число целое, убрать .0
    if rounded == math.floor(rounded) then
        return math.floor(rounded)
    end

    return rounded
end

function round(num,idp) --функция округления
   if idp and num and type(num)=="number" and type(idp)=="number" then
      local mult=10^(idp or 0)
      local x=0
         if num>=0 then
         x=math.floor(num * mult + 0.5) / mult
         else 
         x=math.ceil(num * mult - 0.5) / mult
      end
      if x==math.floor(x) then x=math.floor(x) end -- обрезка нуля
      return x
   else
      return num
   end
end

x=1.112443287174
startA();  z=0.01*math.floor(100*x)            print("t(мкс)="..0.1*stopA()..",z="..z)
startA();  y=string.sub(x,1,string.find(x,'.')+3) print("t(мкс)="..0.1*stopA()..",y="..y)

D:/lua53/lua53.exe -e "io.stdout:setvbuf 'no'" "nkAI.lua" 
t(мкс)=1.0,z=1.11
t(мкс)=6.2,y=1.11
>Exit code: 0

 f3:write("\tПрибыль в %: "..vr7);

 f3:write("\tПрибыль в %: "..string.format("%.2f",vr7));