Giải bài tập Tin học 11: Bài tập và thực hành 4

Chủ nhật - 30/09/2018 03:36
Giải bài tập Tin học 11: Bài tập và thực hành 4
Bài 1: a) Hãy tìm hiểu và chạy thử chương trình thực hiện thuật toán sắp xếp dãy số nguyên bằng tráo đổi với các giá trị khác nhau của n dưới đây. Qua đó, nhận xét về thời gian chạy của chương trình.
Giải:

a) Sau khi nhập chương trình, cho chương trình chạy và nhập số phần tử của dãy, chẳng hạn với n= 10, thì giá trị các phần tử của mảng ngẫu nhiên được tạo ra như sau:
Phần tử thứ nhất= 100;
Phần tử thứ hai= -122;
Phần tử thứ ba= 22;
Phần tử thứ tư= -40;
Phần tử thứ năm=71;
Phần từ thứ sáu= 31;
Phần tử thứ bảy= -141;
Phần tử thứ tám= 29;
Phần tử thứ chín= -99;
Phần tử thứ mười= 162;
thì chương trình in ra thông báo:
Day so duoc sap xep:
-141
-122
-99
-40
22
29
31
71
100
162
Kết quả chương trình như hình 40 dưới đây:

Ta nhận thấy rằng, mảng được sắp xếp theo trình tự từ số bé nhất đến số lớn nhất của mảng. Trong trường hợp với n= 10 phần tử như đã nói ở trên thì mảng được tạo ngẫu nhiên và sắp xếp từ số bé nhất -141 đến số lớn nhất 162.
Tương tự, với n-15 thì kết quả cùa chương trình sẽ như hỉnh 41 dưới đây:

b) Sau khi chương trình ờ câu a) đã chạy và cho kết quả tốt, ta thực hiện lệnh File/save để ghi lại chương trình vào máy tính, chẳng hạn với tên tệp btth4_la.doc. Để tiến hành giải bài toán ở câu b) thì ta thực hiện lệnh File/Save as đề ghi chương trình sang một tệp khác. Chẳng hạn, với tên btth4_1b.doc.
Khi đưa biến nguyên dem vào chương trình và bổ sung vào chương trình “Giải bài toán sắp xếp dãy sổ" các lệnh: dem:= 0; dem:= dem + 1;
write('So lan trao doi la: ',dem);
để thực hiện việc tính sổ lần tráo đổi trong thuật toán thì chương trình được chỉnh lại như sau:
uses crt;
const Nmax = 2 50;
type Arrlnt = Array[1..Nmax] of integer;
var n, i, j, y, t, dem, : integer;
A: ArrInt;
Begin
clrscr;
randomi ze;
write(’Nhap n= ');
readln(n) 
{Tao nau nhien mang gom n so nguyen}
for i:= 1 to n do A[i]:= random(300)-random(300);
for i:= 1 to n do write(A[i]:5); {in mang vua tao}
writeln;
dem: = 0;
for j:=N downto 2 do
for i:= 1 to j-1 do if A[i]>A[i+1] then
begin (*Trao doi A[i] va A[i+1]*) t: = A [ i ] ;
A [ i ] : = A [ i + 1 ] ,ề A [ i +1 ] : = t : dem:= dem + 1; end;
writeln('Day so duoc sap xep:')
 for i:= 1 to n do writeln(A[i]:7) ;
write('So lan trao doi la: ',dem);
writeln;
readln
End.

Bài 2:
a) Hãy đọc và tìm hiểu những phân tích để viết chương trình giải bài toán:
Cho mảng A gồm n phần tử. Hãy viết chương trình lạo mảng B[1..n], trong đó B[i] là tổng của i phần tử đầu tiên của A.
Thoạt đầu có thể viết chương trình sau để giải bài toán này:
program subsuml;
uses crt;
const nmax=100;
type Myarray= array[1..nmax] of integer;
var A, B: Myarray;
n, i, j: integer;
Begin
clrscr;
randomize;
write(' Nhap n:');
readln(n);
{Tao ngau nhien mang gom n so nguyen} for i:= 1 to n do A[i]:= random(300)-random(300);
for i:= 1 to n do write(A[i]:5) ;
writeln;
{Bat dau tao B}
for i:= 1 to n do begin
B[i] := 0;
for j:= 1 to Ỉ do B[i]:= B[i] + A[j];
end;
{ket thuc tao B}
for i:= 1 to n do write(B[i]:6) ;
readln
End.
Để ý rằng ta có các hệ thức sau:
B[1 ] =A[1]
B [ j ] =  [ i -1) + A [ i ] , 1 < i  ≤n .
Với hai lệnh này, máy chỉ phải thực hiện n - 1 phép cộng, trong khi với đoạn chương trình trên máy phải thực hiện n(n + 1)/2 phé cộng.
Nhờ việc phân tích ta có thể tiết kiệm được một lượng tính toán đáng kể.
Tuy tốc độ tính toán của máy tính nhanh nhưng có giới hạn. Do đó, trong khi viết chương trình, ta nên tìm cách viết sao cho chương trình thực hiện càng ít phép toám càng tốt.

Giải:
a) Khi chạy chương trình tạo mảng B[1..n], B[i] là tổng của phần tử đầu tiên cùa mảng A - gồm n phần tử và nhập vào số phần tử của mảng thì ta có được kết quả của chương trình.
Với n=10 thì kết quả của chương trình như hình 43 dưới đây:

Diễn gỉải:
Từ kết quả của chương trình đã cho ở trên, ta nhận thấy rằng: với n=10 mảng A được tạo ngẫu nhiên là: -118   6   -42   -22   -37   11   243   19  90   116. Khi đó, các phần tử cùa mảng B sẽ là như sau:
phần tử đầu tiên của mảng D là -118;
phần tử thứ hai của mảng B là: -118 + 6 = -112;
phần tử thứ ba của mảng B là: -112 + (-42) = -154;
phần tử thứ tư của mảng B là: -154 + (-22) = -176;
phần tử thứ năm của mảng B là: -176 + (-3 7) = -213;
phần tử thứ sáu của mảng B là: -213 + 11= -202;
phần tử thứ bảy của mảng B là: -202 + 243 = 41;
phần tử thứ tám của mảng B là: 41 + 19 = 60;
phần tử thứ chín của mảng B là: 60 + 90 = 150;
phần tử thứ mười của mảng B là: 150+116 = 266.
Như vậy, các phần tử củ a mảng B là  
-118    -112    -154    -176    -213    -202    41    60    150    226.
Với n= 15 thì kết quả của chương trình như hình 44 dưới đây:

b) Khi ta thay đoạn chương trình sau ở câu a)
for i : 1 to n do
begin
B [ i ] : = 0 ;
for j:=1 to i do B[i]:= B[i]+A[j];
end.
bởi hai lệnh:
B[i] = A[1] 
for i:= 2 to n do B[i] := B[i — 1] + A[i];
thì chương trình tạo mảng B[1..n], trong đó B[i] là tổng của phần tử đầu tiên của mảng A sẽ là như sau:
progran subsum2 ;
uses crt; const nmax= 100;
type Marray= array [1. .nmax] of integer;
var A, 3: Myarray;
n, i, j: integer;
Begin
clrscr;
randonize
write (' Nhap n : ' );
readlr(n)
{Tao nau nhien mang gom n so nguyen} for i:= 1 to n do A[i]:= random(300)- random(300);
for i:= 1 to n do write (A[i] : 5) ;
writeln B [1] := A[l] ;
for i = 2 to n do B[i]:= B[i-1] + A[i];
for i: 1 to n do write (B[1]:6)
readln
End.
Khi chạy chương trình vừa hiệu chỉnh này, với sổ phần tử của mảng A bằng 9 thì kết quả của chương trình sẽ như hình 45 dưới đây:

Diễn giải:
Với hai lệnh:
B[1]:= A[1];
for i:= 2 to n do B[i] := B[i-1] + A[i];
thì kết quả chương trình sẽ không thay đổi so với chương trình ban đầu nghĩa là: mảng ban đầu A ngẫu nhiên được tạo: 81 -38 -57 68 -57 thì với lệnh B[i]:= A [ 1 ] ; thì phần tử đầu tiên của mảng D là 81;
Tiếp đến, khi i = 2 thì phần tử thứ hai của mảng B là: 81+ (-38) = 43;
Tiếp đến, khi i = 3 thì phần tử thứ ba cùa mảng B là: 43 + (-57) =-14;
Tiếp đến, khi i = 4 thì phần tử thứ tư cùa mảng B là: -14 + 68 = 54;
Tiếp đến, khi i = 5 thì phần tử thứ năm của mảng B là54 + (-57) = -3.
Như vậy, mảng B được tạo ra là: 81   43     -14      54     -3.
Với số phần tử của mảng A bằng 20 thì kết quả của chương trình sẽ như hình 46 dưới đây:

Qua hai chương trình đã nêu ờ trên, ta nhận thấy rằng chương trình thứ hai tiết kiệm được một số phép toán. Cho nên, nó sẽ tiết kiệm được thời gian chạy máy, tiết kiệm được bộ nhớ cùa máy tính.

  Ý kiến bạn đọc

THÀNH VIÊN

Hãy đăng nhập thành viên để trải nghiệm đầy đủ các tiện ích trên site
Kênh Bóng đá trực tiếp hôm nay miễn phí
Kênh
90Phut TV full HD ⇔ 32win
69VN ⇔ 78 WIN ⇔ F168 ⇔ 123b

Vmax ⇔ 78Win ⇔ hubet ⇔ 789club
789f ⇔ SHBET ⇔ nh88 ⇔ x88 ⇔ 789f
fo88vic88 ⇔ x88 ⇔ win678 ⇔ okvip
BL555 ⇔ Kkwin ⇔ KJC ⇔ Link MB66
mv66af88 ⇔ 8x bet ⇔ iWinClub
789BET ⇔ B52 club ⇔ BL555 ⇔ 58WIN
OKFUN ⇔ 789F ⇔ MB66 ⇔ 8xbet
https://789betcom0.com/ ⇔ https://hi88.baby/
UU88 ⇔ 86bet ⇔ win678 ⇔ SHBET
zo88 ⇔ ev99 ⇔ Vua88 ⇔ go88
Kubet11 ⇔ topbet ⇔ v8club ⇔ tv88 ⇔ 77win
MB66 ⇔ pu88 ⇔ 789WIN ⇔ Sanclub
188v ⇔ f168 ⇔ QQ88 ⇔ bk8 ⇔ bk8
789club ⇔ iwinclub ⇔ Subnhanh ⇔ Bluphim
vua88 ⇔ Nettruyenviet ⇔ https://hi88o.com/
vn23 ⇔ KUWIN ⇔ kubet ⇔ 888new
NOHU ⇔ hi88 ⇔ https://fun88.social/
88clbxoso66 ⇔ https://vnalo789c.com/
https://qq88.fun/ ⇔ f168 ⇔ 888New ⇔ QQ88
daga ⇔ SHBET ⇔ keo nha cai ⇔ bl-555.site
https://bshbet.com/ ⇔ https://uk88.rocks
BJ88 ⇔ 789f ⇔ mm88 ⇔ RR88 ⇔ 78WIN
https://nohu90.ad/ ⇔ https://hello8880.net/
tv88hi88 ⇔ f168 ⇔ uu88 ⇔ 33win
NOHU ⇔ hi88com ⇔ 32win ⇔ Kuwin
ek333 ⇔ xoso66 ⇔  ⇔ Xóc đĩa online
Fun88 ⇔ https://f168.com.co/ ⇔ 28Bet
NOHU ⇔ KINGFUN ⇔ https://789club24.com/
https://98winlive.com/ ⇔ https://789win.voyage/
https://bet88yk.com/ ⇔ https://alo789apk.app/
https://33win100.com/ ⇔ Cổng game rikvip
69vn ⇔ vn88 ⇔ https://king88com.uk.net/
https://j88usd.com/ ⇔ https://okwin.technology/
game bài đổi thưởng ⇔ https://hello880.net/
https://789club60.com/ ⇔ https://jun88.black/
23win ⇔ 789p ⇔ f168 ⇔ nohu90 ⇔ onbet
nhatvip ⇔ https://789club24.com/ ⇔ 789 bet
win68 ⇔ 8xbet ⇔ go99 ⇔ j88 ⇔ 32 win
XX88 ⇔ 89BET ⇔ QQ88 ⇔ topbet
Uu88 ⇔ V8club ⇔ 78win ⇔ lương sơn tv
https://33win101.com/ ⇔ oxbet ⇔ Min88
78win ⇔ https://shbet.gg/ ⇔ XX88
daga ⇔ SV388 ⇔ 77ball ⇔ Mbet
SHBET ⇔ Kkwin ⇔ Phimbathu ⇔ Hay 88
https://shbet.solar/ ⇔ https://58winbank.com/
https://32winmb.com/ ⇔ 77BET ⇔ 12BET
vmaxVMAX ⇔ vl8838.com ⇔ K8CC
nhà cái uy tín ⇔ https://hi88.gives/
555win35.com ⇔ https://f168.law/
game bài đổi thưởng ⇔ alo88 ⇔ vwin ⇔ sut88
New88 ⇔ nhacaiuytinovn39.com ⇔ 79king
ww88 ⇔ vankhanhtv ⇔ https://13win.vegas/
game bài đổi thưởng ⇔ https://hi88.uno/
https://58win1.info/ ⇔ j88 ⇔ j88 ⇔ 69vn
bl555.com ⇔ 78 win ⇔ 789f ⇔ go 88
MM88 ⇔ Nh88 ⇔ 73bet ⇔ S666
11uu ⇔ 123B ⇔ 78win ⇔ 888win
https://xx88.ink/ ⇔ mv88 ⇔ YO88 ⇔ QQ88
789win ⇔ Bet88 ⇔ Vmax ⇔ Sun Win
tỷ lệ kèo nhà cái hôm nay ⇔ BIN88
https://j88.ventures/ ⇔ https://qq88.studio/
https://oldhamcarnival.org.uk/ ⇔ Leo88
88CLB ⇔ SV388 ⇔ https://cakhiatv88.net/
888Bi9 Bet ⇔ Tv88 ⇔ hi88 ⇔ F8BET
socolive trực tiếp74bet ⇔ VN168
Bong88 ⇔ kèo nhà cái ⇔ Sao789 ⇔ ok365
https://bet88.ventures/ ⇔ trực tiếp bóng đá
https://king88clb.com ⇔ nohu90 ⇔ kingfun
sv66nhà cái thabet ⇔ bong88 ⇔ Nn88
https://32win.vc/ ⇔ 888new ⇔ PG88 ⇔ PG88
EE88 ⇔ B52Club ⇔ B52 Club ⇔ lô đề hôm nay
sky88 ⇔ Vin777 ⇔ SV388 ⇔ MV66 ⇔ 32win
https://vankhanhtvv.com/ ⇔ game bài đổi thưởng
game bài đổi thưởng ⇔ https://u888lm.com/
https://sv66.coupons/ ⇔ https://f168.tech/
https://8kbetbh.com/ ⇔ https://ta88club.kim/
https://jun88.now/ ⇔ https://rr88.com.se/
Game bài đổi thưởng ⇔ tỷ lệ bóng đá
https://58win.jpn.com/ ⇔ https://xin88.sa.com/
https://qq88.photo/ ⇔ https://79king1.best
lô đề online ⇔ https://78winvina.com/
for88 ⇔ https://shbetasia.com/ ⇔ Bet88
https://888b-link.cc/ ⇔ https://sunwinn.deal/
https://sunwinn.team/ ⇔ https://bong88vn.wiki/
https://mb66az.com/ ⇔ https://shbet.racing/
789f ⇔ 88i ⇔ https://new88blog.org/
Jun88 ⇔ Jun88 ⇔ jun88 ⇔ 67bet
MM88 ⇔ https://789betw.co/ ⇔ UU88
https://qq887p.com/ ⇔ https://w88link1.com/
xocdia88 ⇔ 77ball ⇔ vuabet88 ⇔ betvisa
https://789freal.com/ ⇔ https://2789f.com/
https://fun88link0.com/ ⇔ https://fun88link1.com/
https://188betlink0.com/ ⇔ https://188betlink1.com/
https://188betlink2.com/ ⇔ https://w88link0.com/
thabet ⇔ 32WIN ⇔ J88 ⇔ ax88 ⇔ 789F
QQ88 COM ⇔ https://xx88.sale/ ⇔ 78win
https://bet88.pictures/ ⇔ https://xo88.group/
https://86bet.tech/ ⇔ https://nohu90.consulting/
789BET ⇔ https://i9betz4.com/ ⇔ đá gà 88
w88link2.com ⇔ w88link3.com ⇔ luck8
https://8dayvip.mobi/ ⇔ https://8dayvip.com/
QQ88 Com ⇔ af88 ⇔ https://79kingsr.com/
https://pg99yk.com/ ⇔  hm88.com ⇔ J88
https://luongson161.tv/ ⇔ 78WIN ⇔ MB66
78win ⇔ U888 ⇔ nn88 ⇔ 99win ⇔ hi88
https://8kbettt.com/ ⇔ https://hi88.biz/
https://thabetcasino.us.com/ ⇔ 789Win ⇔ vn88
https://hello88net.com/ ⇔ https://pg88.jpn.com/
https://az8888.org/ ⇔ https://fly88.gifts/
lc88 ⇔ VN88 ⇔ 69vn ⇔ nh88 ⇔ vn88
https://go800s.com/ ⇔ 888newport.com
tỷ lệ kèo nhà cái 88 ⇔ PG66 ⇔ 68win
BL555 ⇔ 23win ⇔ SV388 ⇔ SHBET ⇔ vua88
Game bài đổi thưởng ⇔ https://saobet.shop/
https://99ok99ok.com/ ⇔ hb88 ⇔ HM88
https://bet88.ventures/ ⇔
Bạn đã không sử dụng Site, Bấm vào đây để duy trì trạng thái đăng nhập. Thời gian chờ: 60 giây