Ciao
Puoi fare una cosa di questo tipo:
Dim età As Integer
Dim somma As Double
'Ottiene la percentuale da rimuovere. Se viene un numero negativo,
'la percentuale è 0
Dim percent As Double = Math.Max((età - 11) * 0.5, 0)
'Rimuove dalla somma la percentuale da rimuovere
somma -= somma * percent / 100
Luca