var a,b,c:real; begin read(a); if a>=10 then b:=a*1.2 else b:=a*1.5; write(b:0:1); end. /************************************************************** Problem: 1630 User: admin Language: Pascal Result: Wrong Answer ****************************************************************/