ISBN13 check digit: Difference between revisions
Content added Content deleted
(K) |
m (→{{header|K}}) |
||
| Line 1,888: | Line 1,888: | ||
=={{header|K}}== |
=={{header|K}}== |
||
| ⚫ | |||
<syntaxhighlight lang=K>digits: {x[&(x>"/")&x<":"]-"0"} |
<syntaxhighlight lang=K>digits: {x[&(x>"/")&x<":"]-"0"} |
||
isbn13c: 0=10!+/{x*(#x)#1 3} digits@ |
isbn13c: 0=10!+/{x*(#x)#1 3} digits@ |
||
| Line 1,899: | Line 1,900: | ||
isbn13c "978-1788399083" |
isbn13c "978-1788399083" |
||
0</syntaxhighlight> |
0</syntaxhighlight> |
||
| ⚫ | |||
=={{header|Kotlin}}== |
=={{header|Kotlin}}== |
||