Bài 9 trang 80 sgk Tin học 11

---

---

Giải bài tập Tin học 11 trang 79,80

Bài 9 (trang 80 sgk Tin học lớp 11): Cho mảng hai chiều kích thước nxm với các phần tử là những số nguyên. Tìm trong mỗi dòng phần tử lớn nhất rồi đổi chỗ nó với phần tử có chỉ số dòng bằng chỉ số cột.

program Diag;
uses crt;
Var
	N,i,j,Max,Ind,Vsp:integer;
	A:array[1..15,1..15] of integer;
begin
	clrscr;
	write('nhap N nho hon 15:');
	readln(N);
	for i:=1 to N do
		for j:=1 to N do
		begin
		write('a[',i,',',j,']=');
		readln(a[i,j]);
		end;
	for i:=1 to N do
	begin
		Max:=A[i,1];
		Ind:=1;
		for j:=2 to N do
		if A[i,j]> Max then
		begin
		Max:=A[i,j];Ind:=j;
		end;
		vsp:=A[i,i];
		A[i,i]:=Max;
		A[i,Ind]:=vsp;
	end;
	for i:=1 to N do
	begin
		writeln;
		for j:=1 to N do 
		write(a[i,j]:3);
	end;
	writeln
	readkey;
end.

Trả lời:

for i:=1 to N do
	begin
		Max:=A[i,1];
		Ind:=1;
		for j:=2 to N do
		if A[i,j]> Max then
		begin
		Max:=A[i,j];Ind:=j;
		end;
		vsp:=A[i,i];
		A[i,i]:=Max;
		A[i,Ind]:=vsp;
	end;

Đoạn code này có nhiệm vụ duyệt từng hàng. Ban đầu gán phần tử đầu tiên của hàng là max . Sau đó nếu trong hàng đó có phần tử nào lớn hơn max thì lưu lại giá trị max và chỉ số của phần tử đó trong hàng.

Để sửa chương trình trên để tìm kiếm trong mỗi cột thì ta sửa lại như sau:

program Diag;
uses crt;
Var
	N,i,j,Max,Ind,Vsp:integer;
	A:array[1..15,1..15] of integer;
begin
	clrscr;
	write('nhap N nho hon 15:');
	readln(N);
	for i:=1 to N do
		for j:=1 to N do
		begin
		write('a[',i,',',j,']=');
		readln(a[i,j]);
		end;
	for i:=1 to N do
	begin
		Max:=A[i,1];
		Ind:=1;
		for j:=2 to N do
		if A[i,j]> Max then
		begin
		Max:=A[i,j];Ind:=j;
		end;
		vsp:=A[i,i];
		A[i,i]:=Max;
		A[i,Ind]:=vsp;
	end;
	for i:=1 to N do
	begin
		writeln;
		for j:=1 to N do 
		write(a[i,j]:3);
	end;
	writeln;
	readkey;
end.

Kết quả :

Các bài giải bài tập và trả lời câu hỏi Tin học 11 Chương 4 khác:

• Bài 1 (trang 79 sgk Tin học lớp 11): Tại sao mảng là kiểu dữ liệu có cấu trúc...

• Bài 2 (trang 79 sgk Tin học lớp 11): Tại sao phải khai báo kích thước của mảng...

• Bài 3 (trang 79 sgk Tin học lớp 11): Các phần tử của mảng có thể có những kiểu gì...

• Bài 4 (trang 79 sgk Tin học lớp 11): Tham chiếu đến phần tử của mảng bằng cách nào...

• Bài 5 (trang 79 sgk Tin học lớp 11): Viết chương trình nhập từ bàn phím số nguyên dương N...

• Bài 6 (trang 79 sgk Tin học lớp 11): Viết chương trình nhập từ bàn phím số nguyên dương N...

• Bài 7 (trang 79 sgk Tin học lớp 11): Dãy F là dãy Phi-bo-na-xi nếu...

• Bài 8 (trang 79 sgk Tin học lớp 11): Chương trình sau thực hiện những gì...

• Bài 9 (trang 80 sgk Tin học lớp 11): Cho mảng hai chiều kích thước nxm với các phần tử là những...

• Bài 10 (trang 80 sgk Tin học lớp 11): Viết chương trình nhập từ bàn phím xâu kí tự S có độ dài...

• Bài 11 (trang 80 sgk Tin học lớp 11): Hãy bổ sung thêm vào chương trình Xep_loai ở bài 13 những...

---

---

---