(1)予備校の発表する偏差値は合格者の偏差値の平均値
(2)合格者の成績分布は正規分布で標準偏差は母集団と同じ
(3)成績のよい方から入学を辞退する

という前提で

虚飾値=合格者の偏差値 - 入学者の偏差値

を計算すると

> data.frame(辞退率=p,虚飾値=round(f(p),1))
辞退率 虚飾値
1 0.1 1.9
2 0.2 3.5
3 0.3 5.0
4 0.4 6.4
5 0.5 8.0
6 0.6 9.7
7 0.7 11.6
8 0.8 14.0
9 0.9 17.5

予備校の発表する偏差値より10引いたくらいが妥当だと思う。