银行卡校验易语言源码

银行卡校验易语言源码

.版本 2 .子程序 银行卡卡号校验, 逻辑型, , 一般都是19位 .参数 卡号, 文本型 .局部变量 m, 整数型, , "10" .局部变量 i, 整数型 .局部变量 digit, 整数型 .局部变量 sum, 整数型 .局部变量 odd, 整数型 m [1] = 0 m [2] = 2 m [3] = 4 m [4] = 6 m [5] = 8 m [6] = 1 m [7] = 3 m [8] = 5 m [9] = 7 m [10] = 9 odd = 1 .变量循环首 (取文本长度 (卡号), 1, -1, i) digit = 取代码 (卡号, i) - 48 sum = sum + 选择 (odd ≠ 0, digit, m [digit + 1]) .如果 (odd = 1) odd = 0 .否则 odd = 1 .如果结束 .变量循环尾 () ' const int m[] = {0,2,4,6,8,1,3,5,7,9}; // mapping for rule 3 ' int i, odd = 1, sum = 0; ' for (i = strlen(cc); i--; odd = !odd) ' { ' int digit = cc[i] - '0'; ' sum += odd ? digit : m[digit]; ' } 返回 (sum % 10 = 0)
相关文件下载地址
©下载资源版权归作者所有;本站所有资源均来源于网络,仅供学习使用,请支持正版!

银行卡校验易语言源码》有0个想法

发表回复

您的邮箱地址不会被公开。 必填项已用 * 标注