level 9
国庆期间，某超市举行购物优惠活动：所购物品不超过100元时，按九折付款，如超过100元，超过部分按六折收费。请你编一程序完成超市自动计费的工作。
输入只有一个整数M，表示购物的款数。
输出打折后的款数（ 结果保留两位小数）。
输入样例1：
23.31
输入样例2：
120
输出样例1：
20.98
输出样例2：
102.00
2015年05月30日 07点05分
1
level 9
var
m,s:real;
begin
read(m);
s := 0;
if m<=100 then
begin
s:=m*0.9;
end
else if m > 100 then
begin
s:= 100*0.9+(m-100)* 0.6;
end;
write(s:0:2);
end.
为神马不对？求大神指教
2015年05月30日 07点05分
2
level 7
var n:extended;
begin
read(n);
if n<=100 then write(n*0.9:0:2) else write(90+(n-100)*0.6:0:2);
end.
2015年05月30日 09点05分
4
![[滑稽]](/static/emoticons/u6ed1u7a3d.png)