02、MATLAB实现身份证号码的鉴别

使用matlab编写程序实现身份证号码的鉴别

str=input('please input a ID:','s');
idstr = str(1:3) ;%截取前三位省份信息
id = str2num(idstr) ;%将字符串类型的省份信息转换为数值型
x1 = str(7:10);  %截取出生年份信息        %str(1:2)  %截取指定位置的字符串
nian= str2num(x1);%将字符串类型的年份信息转换为数值型     %将字符串型数据转换成数值型
x2 = str(11:12) ;%截取出生月份信息 
yue = str2num(x2) ;%将字符串类型的月份信息转换为数值型
x3 = str(13:14) ;%截取出生日期信息 
ri = str2num(x3) ;%将字符串类型的日期信息转换为数值型
x4 = str(18:18) ;%截取校验码信息
riqi = [31,28,31,30,31,30,31,31,30,31,30,31] ;%1-12月每月有多少天
quanzhi = [7 9 10 5 8 4 2 1 6 3 7 9 10 5 8 4 2] ;%身份证号码前十七位每位对应的权值
xiaoyanma = ['1' '0' 'X' '9' '8' '7' '6' '5' '4' '3' '2'] ;%取余后对应的校验码
diqu_ID = [110 120 310 510 150 650 540 640 450 230 220 210 130 140 630 370 410] ;%省份信息不全
diqu_name = {'北京' '天津' '上海' '重庆' '内蒙' '新疆' '西藏' '宁夏' '广西' '黑龙江' '吉林' '辽宁' '河北' '山西' '青海' '山东' '河南'} ;
x5str = str(17:17) ;%截取性别信息
x5 = str2num(x5str) ;%将字符串类型的性别信息转换为数值型
xingbie = '男' ;%性别信息初始化为男
if(rem(x5,2)==0)%取余如果是偶数性别改为女
    xingbie = '女' ;
end
flag = 0 ;
for