var a,b,c,d,e,f:real; begin read(a,b,c); d:=a+b+c; if d>=200 then e:=d*0.8 else e:=d*0.9; write(e:0:1); end. /************************************************************** Problem: 1624 User: admin Language: Pascal Result: Wrong Answer ****************************************************************/