var a:longint; begin read(a); if a>=90 then write('Excellent') else if a>=80 then write('Good') else if a>=60 then write('Pass') else write('Fail'); end. /************************************************************** Problem: 1959 User: admin Language: Pascal Result: Wrong Answer ****************************************************************/