var a:real; n,b,c:longint; begin read(n); b:=n mod 10; c:=n div 10; a:=c/b; write(a:0:1); end. /************************************************************** Problem: 1607 User: admin Language: Pascal Result: Wrong Answer ****************************************************************/