Pascal :
var a:integer; begin read(a); if a>10 then writeln(a*2*0.9:0:1) else writeln(a*2); end.
By signing up a 算道OJ universal account, you can submit code and join discussions in all online judging services provided by us.
Using your 算道OJ universal account