找到矩阵中1到5行,6到9列的元素并赋值为零

帮助同学写的一个小代码，内容是创建一个9*9的元素为1的矩阵，并使得矩阵中的1行到5行中6到9列为0，如下

clc

close all
clear all
a1=ones(9,9);
k=0
g=5
for k=0:4
    k=k+1
    for g=5:8
        g=g+1
      a1(k,g)=0  
    end
end
a1