Bài 9 Trang 80 Sgk Tin Học 11

• Bài viết
• Hỏi đáp

Tạo bài viết Đăng nhập Đăng ký Zaidap.com Tin học 09/05/2018, 13:12 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 ...

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

Bình luận về bài viết này Chia sẻ tin đăng đến bạn bè Lưu tin Gửi Messenger Copy link

Nguyễn Mỹ Hương

187 chủ đề

43907 bài viết

Có thể bạn quan tâm

• 1 Bài 1 trang 89 sgk Tin học 11
• 2 Bài 2 trang 50 sgk Tin học 11
• 3 Bài 3 trang 89 sgk Tin học 11
• 4 Bài 4 trang 51 sgk Tin học 11
• 5 Bài 11 trang 80 sgk Tin học 11
• 6 Bài 2 trang 79 sgk Tin học 11
• 7 Bài 2 trang 35 sgk Tin học 11
• 8 Bài 5 trang 79 sgk Tin học 11
• 9 Bài 1 trang 79 sgk Tin học 11
• 10 Bài 8 trang 36 sgk Tin học 11

0 Các chủ đề đang được quan tâm chọn dòng tế bào xôma biến dị | vai trò của công nghệ tế bào | vi du ve cong nghe te bao | một số thành tựu về công nghệ tế bào | trắc nghiệm công nghệ tế bào | Zaidap | Cho thuê phòng trọ hà nội | Cho thuê phòng trọ bình thạnh | Cho thuê phòng trọ | Cho thuê nhà trọ Đăng ký

Đăng ký nhận thông báo

Các bài học hay sẽ được gửi đến inbox của bạn

HỖ TRỢ HỌC VIÊN

• Các câu hỏi thường gặp
• Điều khoản sử dụng
• Chính sách và quy định
• Chính sách bảo mật thanh toán
• Hỗ trợ học viên: [email protected]
• Báo lỗi bảo mật: [email protected]

VỀ ZAIDAP

• Giới thiệu Zaidap
• Cơ hội nghề nghiệp
• Liên hệ với chúng tôi

HỢP TÁC VÀ LIÊN KẾT

• Đăng ký giảng viên
• Giải pháp e-learning
• Chương trình đại lý
• Chương trình Affiliate

KẾT NỐI VỚI CHÚNG TÔI

TẢI ỨNG DỤNG TRÊN ĐIỆN THOẠI

Zaidap.com - Giải đáp mọi thắc mắc, mọi câu hỏi

© Copy right 2018 - 2025