defvalidIsbn(list,length):c=11foriinrange(0,length):c=c-(length+1-i)*list[i]c1=mod(c,11)print'One obtains c1=',c1,'hence the ISBN code is: ',forjinrange(0,length):if((mod(j,3)==0)&(j!=0)):print'-',printlist[j],print'-',c1
validIsbn([2,1,0,0,5,0,6,9,2],9)
One obtains c1= 7 hence the ISBN code is: 2 1 0 - 0 5 0 - 6 9 2 - 7
defeanCode(list):c=10;a=0;b=0foriinrange(0,6):a=a+list[2*i]printaforiinrange(1,7):b=b+list[2*i-1]printbc0=mod(10-(a+3*b),10)print'The EAN-13 code is: ',foriinrange(0,12):if((i==1)|(i==7)):print'-',printlist[i],printc0