CÂU HỎI TRẮC NGHIỆM (P7) docx

CÂU HỎI TRẮC NGHIỆM Câu 1: 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 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 2: 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âu 3: 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 4: 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âu 5: 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 gọi thủ tục TT(a); thì Giá trị của biến a là : a) 2 b) 5 c) 3 d) 0 Câu 6: Cho x, y là hai biến nguyên và khai báo thủ tục : Procedure Doicho( Var a : Integer; b : Integer); Var z : Integer; Begin z:=a; a:=b; b:=z; End; -Sau khi thực hiện các lệnh: x:=7; y:=3; Doicho(x, y); thì giá trị của 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 7: Cho khai báo hàm đệ quy : Function F( a : Integer) : Integer; Begin If a=1 then F:=1 else F:= a*a+ F(a-1); End; Giá trị của hàm F(4) là: a) 1 b) 25 c) 14 d) 30 Câu 8: Khi chạy chương trình : Var x : Integer; Procedure TT ; Begin x:=4; x:= x+5; End; BEGIN x:=0; TT; Write(x); END. -Kết quả in ra là: a) 4 b) 5 c) 9 d) 0 Câu 9: Khi chạy chương trình : Var x : Integer; Procedure TINH ; Var x: Integer ; Begin x:=1; x:= x+12; End; BEGIN x:=10; TINH; Write(x); END. -Kết quả in ra là: a) 10 b) 12 c) 22 d) 13 Câu 10: Khi chạy chương 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. -Kết quả in ra là: a) 35, 4 b) 4, 35 c) 4, 75 d) 354 . CÂU HỎI TRẮC NGHIỆM Câu 1: Cho khai báo đầu của một hàm: Function F( k : Integer) : String ; Begin . y=3 Câu 7: Cho khai báo hàm đệ quy : Function F( a : Integer) : Integer; Begin If a=1 then F:=1 else F:= a*a+ F(a-1); End; Giá trị của hàm F(4) là: a) 1 b) 25 c) 14 d) 30 Câu 8:. khai báo kiểu gì : a) Var y : Real; b) Var y : String; c) Var y : Integer; d) Var y : Char; Câu 3: Cho khai báo biến và khai báo đầu của thủ tục TT: Var x, y : Integer ; St :String ;