1. Trang chủ
  2. » Tất cả

Giai bai tap tin hoc 11 bai tap va thuc hanh 4

5 1 0

Đang tải... (xem toàn văn)

THÔNG TIN TÀI LIỆU

Nội dung

Giải bài tập Tin học 11 Bài tập và thực hành 4 VnDoc com Thư viện Đề thi Trắc nghiệm Tài liệu học tập miễn phí Trang chủ https //vndoc com/ | Email hỗ trợ hotro@vndoc com | Hotline 024 2242 6188 Giải[.]

Thư viện Đề thi - Trắc nghiệm - Tài liệu học tập miễn phí Giải tập Tin học 11: Bài tập thực hành Mục đích, yêu cầu + Biết nhận xét, phân tích, đề xuất thuật tốn giải tốn cho chương trình chạy nhanh + Làm quen với liệu có cấu trúc toán xếp Nội dung Bài 1(trang 65 sgk Tin học 11): a) Hãy tìm hiểu chạy thử chương trình thuật tốn xếp dãy số nguyên thuật toán tráo đổi với giá trị khác n Qua nhận xét thời gian chạy chương trình Trả lời: program sapxep; uses crt;const Nmax=250; var N,i,j,t:integer; A:array[1 Nmax] of integer; begin clrscr; randomize; write('nhap so luong phan tu cua day N='); readln(N); for i:=1 to N begin A[i]:=random(300)-random(300); end; for i:=1 to N write(A[i]:5); writeln; for j:=N downto for i:=1 to j-1 if A[i]>A[i+1] then begin t:=A[i]; A[i]:=A[i+1]; A[i+1]:=t; end; writeln('day da duoc sap xep la '); Trang chủ: https://vndoc.com/ | Email hỗ trợ: hotro@vndoc.com | Hotline: 024 2242 6188 Thư viện Đề thi - Trắc nghiệm - Tài liệu học tập miễn phí end for i:=1 to N write(A[i]:4); readln; Kết b) Khai báo thêm biến nguyên Dem bổ sung vào chương trình câu lệnh cần thiết để biến Dem tính số lần thực tráo đổi thuật toán Đưa kết hình Trả lời: program sapxep; uses crt;const Nmax=250; var N,i,j,t,dem:integer; A:array[1 Nmax] of integer; begin clrscr; randomize; write('nhap so luong phan tu cua day N='); readln(N); for i:=1 to N begin A[i]:=random(300)-random(300); end; dem:=0; for i:=1 to N write(A[i]:5); writeln; for j:=N downto for i:=1 to j-1 if A[i] > A[i+1] then begin t:=A[i]; A[i]:=A[i+1]; A[i+1]:=t; dem:=dem+1; end; Trang chủ: https://vndoc.com/ | Email hỗ trợ: hotro@vndoc.com | Hotline: 024 2242 6188 Thư viện Đề thi - Trắc nghiệm - Tài liệu học tập miễn phí end writeln('day da duoc sap xep la '); for i:=1 to N write(A[i]:4); writeln; writeln('so lan thuc hien trao doi la ',dem); readln; Kết Bài (trang 66 sgk Tin 11): Hãy đọc tìm hiểu phân tích để viết chương tình giải toán : Cho mảng A gồm n phần tử Hãy biết chương trình tạo mảng B[1 n] B[i] tổng I phần tử A Trả lời: Có cách: Cách duyệt phần từ mảng B Đến vị trí I ta duyệt từ đến I mảng A cộng dồn vào B[i] Cách ta nhận thấy B[j]=B[j-1]+A[j] j khác 1và B[j]=A[1] j=1 Cách 1: program sapxep; uses crt;const Nmax=250; var N,i,j,t,dem:integer; A:array[1 Nmax] of integer; B:array[1 Nmax] of integer; begin clrscr; randomize; dem:=0; write('nhap so luong phan tu cua day N='); readln(N); for i:=1 to N begin Trang chủ: https://vndoc.com/ | Email hỗ trợ: hotro@vndoc.com | Hotline: 024 2242 6188 Thư viện Đề thi - Trắc nghiệm - Tài liệu học tập miễn phí end A[i]:=random(300)-random(300); B[i]:=0; end; for i:=1 to N for j:=1 to i begin B[i]:=B[i]+A[j]; dem:=dem+1; end; writeln('dem=',dem); readln; Kết Số lần thực thi phép cộng là: Cách 2: program sapxep; uses crt;const Nmax=250; var N,i,j,t,dem:integer; A:array[1 Nmax] of integer; B:array[1 Nmax] of integer; begin clrscr; randomize; dem:=0; write('nhap so luong phan tu cua day N='); readln(N); for i:=1 to N begin A[i]:=random(300)-random(300); B[i]:=0; end; B[1]:=A[1]; for i:=2 to N begin B[i]:=B[i-1]+A[i]; Trang chủ: https://vndoc.com/ | Email hỗ trợ: hotro@vndoc.com | Hotline: 024 2242 6188 Thư viện Đề thi - Trắc nghiệm - Tài liệu học tập miễn phí end dem:=dem+1; end; writeln('dem=',dem); readln; Kết Số lần thực thi phép cộng Nhận thấy sử dụng cách làm giảm đáng kể số lượng phép toán cần thực Tuy tốc độ máy tính nhanh có giới hạn Vì ta nên tìm cách viết cho chương trình thực phép tốn tốt Xem thêm tại: https://vndoc.com/tai-lieu-hoc-tap-lop-11 Trang chủ: https://vndoc.com/ | Email hỗ trợ: hotro@vndoc.com | Hotline: 024 2242 6188 ... | Hotline: 0 24 2 242 6188 Thư viện Đề thi - Trắc nghiệm - Tài liệu học tập miễn phí end writeln(''day da duoc sap xep la ''); for i:=1 to N write(A[i] :4) ; writeln; writeln(''so lan thuc hien trao... toán cần thực Tuy tốc độ máy tính nhanh có giới hạn Vì ta nên tìm cách viết cho chương trình thực phép tốn tốt Xem thêm tại: https://vndoc.com/tai-lieu -hoc -tap- lop -11 Trang chủ: https://vndoc.com/... for i:=1 to N begin Trang chủ: https://vndoc.com/ | Email hỗ trợ: hotro@vndoc.com | Hotline: 0 24 2 242 6188 Thư viện Đề thi - Trắc nghiệm - Tài liệu học tập miễn phí end A[i]:=random(300)-random(300);

Ngày đăng: 23/03/2023, 08:32