program ex_1; var a:longint; begin read(a); if(a=1)then write('swim'); if(a=3)then write('program'); if(a=5)then write('read'); if(a=6)then write('math'); if(a=2) or (a=4) or (a=7)then write('rest'); end. /************************************************************** Problem: 1669 User: admin Language: Pascal Result: Wrong Answer ****************************************************************/