let 
    function printint(i: int) =
        let 
            function f(i:int) = 
                if i>0 
                    then (f(i/10); print(chr(i-i/10*10+ord("0"))))
        in 
            if i<0 then (print("-"); f(-i))
            else if i>0 then f(i)
            else print("0")
        end
in
    
    let
        var rate := 2
    
        function getCost(total:int):int =
    	(
    	let
    		var newrate := 10
    		function getExtra() = 
    		(
    		  if(total > 100) then rate:= 5 else rate := rate
    		)
    	in
    	  getExtra();newrate*total*rate
    	end
    	)
    
    in
    	printint(getCost(250) + 20)
    end
    
end