var a,b:real; begin read(a); if a<=20 then b:=a*1.68 else b:=a*1.98; write(b:0:2); end. /************************************************************** Problem: 1643 User: admin Language: Pascal Result: Wrong Answer ****************************************************************/