viết chương trình kiểm tra ma tran co la ma tran chữ thập hay không biết 1 ma tran được goi là ma trận chữ thập nếu phần tử ở hai đường chéo=1, các phần tử còn lại =0
P/s:Làm bằng pascal nha! hay vote 5*
viết chương trình kiểm tra ma tran co la ma tran chữ thập hay không biết 1 ma tran được goi là ma trận chữ thập nếu phần tử ở hai đường chéo=1, các phần tử còn lại =0
P/s:Làm bằng pascal nha! hay vote 5*
program sochanle;
uses crt;
var n,i,dc,dl:integer;
begin
clrscr;
write(‘Nhap n: ‘); readln(n);
dc:=0; dl:=0;
for i:=1 to n do
if (i mod 2=1) then dl:=dl+1 else dc:=dc+1;
writeln(‘So luong so chan la: ‘,dc);
writeln(‘So luong so le la: ‘,dl);
readln
end.