Tải bản đầy đủ (.doc) (3 trang)

Đề cương ôn tập Tin học HKII Lớp 11

Bạn đang xem bản rút gọn của tài liệu. Xem và tải ngay bản đầy đủ của tài liệu tại đây (174.52 KB, 3 trang )

ĐỀ CƯƠNG ÔN TẬP HỌC KỲ II
MÔN TIN HỌC 11
I. NỘI DUNG:
Chương V: Tệp và thao tác với tệp
1. Khai báo biến tệp: Var <tên biến tệp> : Text ;
2. Thao tác với tệp:
3. Một số hàm thường dùng đối với tệp văn bản:
+ Hàm EOF(<tên biến tệp>);
+ Hàm EOLN(<tên biến tệp>);
Chương VI: Chương trình con và lập trình có cấu trúc
1. Khái niệm chương trình con
2. Cấu trúc của chương trình con:
a. Cấu trúc của hàm:
Function <tên hàm>([<DS tham số>]):<kiểu dữ liệu>;
[<Phần khai báo>]
Begin
[<Dãy lệnh>]
End;
Trong thân hàm phải có câu lệnh gán giá trị cho tên hàm:
<tên hàm> := <biểu thức>;
b. Cấu trúc của thủ tục:
Procedure <tên thủ tục>([<DS tham số>]);
[<Phần khai báo>]
Begin
[<Dãy lệnh>]
End;
3. Thực hiện chương trình con
4. Các khái niệm: Tham số thực sự, tham số hình thức, tham biến, tham trị, biến cục bộ, biến toàn bộ
II. BÀI TẬP:
1. TRẮC NGHIỆM:
Câu 1. Cho chương trình sau: (Tính thành 5 câu)


Var m,n,T : integer;
Procedure TD (Var C: integer; x: byte);
Var i: Byte;
Begin
i:=3; Writeln(C, ‘ ’,x);
x:=x+i;
C:=C+i;
S:=x+C;
Writeln(C, ‘ ’,x);
End;
Begin
Write(‘nhập m và n:’); Readln(m,n);
TD(m,n);
Writeln(m,’ ‘,n,’ ‘,T);
End.
1
Câu 2: Cho chương trình sau:
Var f: text;
Begin
Assign(f,'Khoi11.txt');
Rewrite(f);
Write(f, 105*2-134);
Close(f);
End.
Câu 3: Cho chương trình sau:
Var g: text;
Begin
Assign(g,'ktra.inp');
Rewrite(g);
Write(g,'510+702-792');

Close(g);
End.
Câu 4. Khẳng định nào sau đây là đúng?
A. Cả thủ tục và hàm đều có thể có tham số hình thức
B. Chỉ có thủ tục mới có thể có tham số hình thức
C. Chỉ có hàm mới có thể có tham số hình thức.
D. Thủ tục và hàm nào cũng phải có tham số hình thức
Câu 5. Dữ liệu kiểu tệp
A.sẽ bị mất hết khi tắt máy.
B. sẽ bị mất hết khi tắt điện đột ngột.
C.không bị mất khi tắt máy hoặc mất điện.
D. cả A, B, C đều sai.
Câu 06. Để gán tệp kq.txt cho biến tệp f1 ta sử dụng
câu lệnh
A. assign(‘f1,D:\kq.txt’);
B. assign(‘kq.txt=f1’);
C. assign(kq.txt,’D:\f1’);
D. assign(f1,’D:\kq.txt’);
Câu 7. Dữ liệu kiểu tệp
A.được lưu trữ trên ROM.
B. được lưu trữ trên RAM.
C.chỉ được lưu trữ trên đĩa cứng.
D. được lưu trữ trên bộ nhớ ngoài
Câu 8. Kiểu dữ liệu của chương trình con
A. Chỉ có thể là kiểu integer.
C. Có thể là các kiểu integer, real, char, boolean, string.
B. Chỉ có thể là kiểu real
D. Có thể là integer, real, char, boolean, string, record,
kiểu mảng.
Câu 9. Để ghi kết quả vào tệp văn bản ta có thể sử

dụng thủ tục nào sau:
A. read(<tên tệp>,<danh sách kết quả>);
B. read(<tên biến tệp>,<danh sách kết quả>);
C. write(<tên tệp>,<danh sách kết quả>);
D. write(<tên biến tệp>,<danh sách kết quả>);
Câu 10. Để đọc dữ liệu từ tệp văn bản ta có thể sử
dụng thủ tục nào sau:
A. read(<tên tệp>,<danh sách kết quả>);
B. read(<tên biến tệp>,<danh sách kết quả>);
C. write(<tên tệp>,<danh sách kết quả>);
D. write(<tên biến tệp>,<danh sách kết quả>);
Câu 11: Để biết khi nào thì kết thúc dòng, người ta
dùng hàm:
A. EOFLN(<biến tệp>) B. EOF(<biến tệp>)
C. FOE(<biến tệp>) D. EOLN(<biến tệp>)
Câu 12: Để biết khi nào thì kết thúc tệp, người ta dùng
hàm:
A. EOFLN(<biến tệp>) B. EOF(<biến tệp>)
C. FOE(<biến tệp>) D. EOLN(<biến tệp>)
Câu 13: Cho khai báo của một hàm:
Function F( k : Integer) : String ;
Begin
If k mod 2=0 then F:=’Chan’ else F:=’Le’;
End;
Muốn gán X:= F(5); thì biến X phải khai báo kiểu gì :
a) Var X: Real; b) Var X: String;
c) Var X: Integer; d) Var X : Char;
Câu 14 Cho khai báo đầu của một hàm:
Function F( k : Integer) : String ;
Begin

If k mod 2=0 then F:=’Chan’ else F:=’Le’;
End;
Muốn in Write( F(y) ); thì biến y phải khai báo kiểu gì :
a) Var y : Real; b) Var y : String
c) Var y : Integer; d) Var y : Char;
Câu15:Cho khai báo biến và khai báo đầu của thủ tục TT:
Var x, y : Integer ; St :String ;
Procedure TT( Var a : Integer ; b : String);
-Lệnh nào đúng :
a) TT(x +1, St) ; b) TT(10, St) ;
c) TT(x, St) ; d) y:= TT(St, x) ;
Câu 16: Khi chạy chương trình :
Var x, y : Real;
Function F(x, y:Real):Real;
Begin
F:=x;
If x < y then F := y;
End;
BEGIN
x:=10; y:=15;
Write(F(x, y): 0:0);
END.
-Kết qủa in ra:
a) 10 b) 15 c) 0 d) F(x,y)
Câu17: Cho a là biến nguyên a=3, và khai báo thủ tục :
Procedure TT( x : Integer) ;
Begin x:=x+2; End;
Sau khi thực hiện chương trình bên, tập tin
'Khoi11.txt' có nội dung như thế nào?
A. 105*2-134 B. 76

C. 105 304 234 D. 175
Sau khi thực hiện chương trình bên, tập tin
'ktra.inp' có nội dung như thế nào?
A. 510 702 792 B. 420
C. 510 + 702 - 792 D. 510702792
2
3
Sau khi gi th tc TT(a); thỡ Giỏ tr ca bin a l :
a) 2 b) 5 c) 3 d) 0
Cõu18: Cho x,y l hai bin nguyờn v khai bỏo th tc:
Procedure Doicho( Var a : Integer; b : Integer);
Var z : Integer;
Begin z:=a; a:=b; b:=z; End;
-Sau khi thc hin cỏc lnh:
x:=7; y:=3;
Doicho(x, y);
thỡ giỏ tr ca x, y l:
a) x=7, y=7 b) x=3, y=3
c) x=3, y=7 d) x=7, y=3
Cõu 19: Khi chy chng trỡnh :
Var x : Integer;
Procedure TT ;
Begin
x:=4; x:= x+5;
End;
BEGIN
x:=0; TT; Write(x);
END.
-Kt qu in ra l:
a) 4 b) 5 c) 9 d) 0

Cõu 20: Khi chy chng trỡnh :
Var x : Integer;
Procedure TINH ;
Var x: Integer ;
Begin
x:=1; x:= x+12;
End;
BEGIN
x:=10; TINH; Write(x);
END.
-Kt qu in ra l:
a) 10 b) 12 c) 22 d) 13
Cõu 21 : Khi chy chng trỡnh :
Var x : Integer;
Procedure TTA ;
Var x : Integer;
Begin
x:= 7* 5; Write(x, ,);
End;
BEGIN
x:=4; TTA; Write(x:2);
END.
-Kt qu in ra l:
a) 35, 4 b) 4, 35 c) 4, 75 d) 354

2. BI TP:
Bài 1: Viết chơng trình con tính chu vi và diện tích của hình chữ nhật.
Bài 2: Viết chơng trình con:
a) Tính chu vi và diện tích hình tròn theo bán kính.
b) Tính diện tích tam giác, bán kính đờng tròn nội và ngoại tiếp tam giác theo 3 cạnh.

c) Tính thể tích và đờng chéo hình hộp chữ nhật theo 3 kích thớc.
Bài 3: Viết một hàm kiểm tra 3 số thực có phải là 3 cạnh một tam giác hay không.
Bi 4: Xõy dng chng trỡnh con tớnh:
S = 1 + 2+ 3+ + n
S =
n
1

3
1
2
1
1 ++++
Bi 5: Vit chng trỡnh tỡm Max ca 4 s a, b, c, d cú s dng hm tỡm Max hai s x, y
Bi 6: Vit chng trỡnh thc hin vic rỳt gn mt phõn s, trong ú cú s dng hm tớnh c chung ln nht ca hai s
nguyờn UCLN (x, y:integer): integer;
Bi 7: S dng th tc:
Procedure Hoan_doi( var x,y: integer);
Var TG: integer;
Begin
TG:=x;
x:=y;
y:= TG;
end;
Lp trỡnh nhp s nguyờn n( 1<n

100 ) v dóy s P=(p
1
,p
2

,.,p
n
) p
i
l s nguyờn, sp xp li cỏc phn t ca P theo th t
khụng gim. a kt qu ó sp xp ra mn hỡnh.
5
4

×