Câu 12: Trong các hoạt động dưới đây, hoạt động nào sẽ thực hiện lặp lại với số lần chưa biết trước?. Tính tổng của 100 số tự nhiên đầu tiêna[r]
(1)CÂU HỎI TRẮC NGHIỆM ÔN TẬP TIN HỌC Câu 1: Để khỏi chương trình Pascal ta dùng tổ hợp phím:
a Ctrl + X, b Ctrl+ F9, c Alt + F9, d Alt +X Câu 2: Trong Pascal, khai báo sau đúng?
a var tb: real; b var 4hs: integer; c var r=30; d const x: real;
Câu 3: Câu lệnh lặp với số lần chưa biết trước khóa:
a For b While c If d Var
Câu 4: Từ khóa sau dùng để khai báo biến:
a Uses b Begin c Var d Writeln
Câu 5: Giá trị trả b thực khối lệnh sau gì? b := 0;
while b < writeln(b);
a b c d Lặp vô hạn
Câu 6: Nhặt thóc khỏi gạo đến gạo khơng cịn thóc : a Lặp 10 lần b Lặp vô số lần
c Lặp với số lần chưa biết trước d Lặp với số lần biết trước Câu 7: Cho biết cú pháp câu lệnh lặp với số lần chưa biết trước? a For <giá trị cuối> to <giá trị đầu> <câu lệnh>;
b For <biến đếm> :=<chỉ số đầu> to <chỉ số cuối> <câu lệnh>; c While <điều kiện> <câu lệnh>;
d While <giá trị đầu> then <giá trị cuối> <câu lệnh>; Câu 8: Chọn câu lệnh cú pháp:
a for i:=1 to 10; x:=x+1; b for i:=10 to x:=x+1;
c for i:=1 to 10 x:=x+1; d for i:=1 to 10 for j:=1 to 10 x:=x+1; Câu 9: Câu lệnh lặp sau thực lần lặp?
FOR i:=2 TO 13 DO BEGIN s:=s+1 END;
a 10 b c 13 d 12
Câu 10: Cho biết lệnh “Writeln” in hình giá trị j k bao nhiêu? j:=2; k:=3;
for i:=1 to j:=j+1; k:=k+j;
writeln(j, ‘ ‘, k);
a j=4 ; k=9 b j=4 ; k=10 c j=7 ; k=10 d j=6 ; k=10
Câu 11: Biết m:=3; n:=4; tong:=0 Sau thực câu lệnh sau biến tong có kết bao nhiêu?
For i:=m to n tong:=tong+i;
a 10 b.7 c d
Câu 12: Trong hoạt động đây, hoạt động thực lặp lại với số lần chưa biết trước?
a Tính tổng 100 số tự nhiên
b Nhập số nguyên từ bàn phím đủ 50 số c In hình 100 chữ "Tin học"
(2)Câu 13: Kết đoạn chương trình gì? Program ViDu;
Uses crt; Begin n:=5;
While n>0 do Begin
Write (n:3); n:=n-1; end;
readln; End.
a b c d
Câu 14: Giá trị trả a thực lần lặp thứ khối lệnh sau gì? a:= 2; b := 0;
while a > a:= a - 1;
a.1 b c d Lặp vô hạn
Câu 15: Khi sử dụng lệnh lặp While (lặp vô hạn lần) cần tránh lỗi Lặp vô hạn Làm cách nào để tránh gặp lỗi trên?
a Khối lệnh sau phải có câu lệnh gây ảnh hưởng đến kết điều kiện b Khối lệnh trước phải lệnh so sánh
c Khối lệnh sau không làm ảnh hưởng đến kết điều kiện d Tất sai
Câu 16: Giá trị trả b thực lần lặp thứ khối lệnh sau gì? a:= 2; b := 0;
while b < b:= b+ a;
a b c d Lặp vô hạn
Câu 17: Vòng lặp While <Điều kiện> <Câu lệnh>; vòng lặp:
a Chưa biết trước số lần lặp b Biết trước số lần lặp
c Biết trước số lần lặp giới hạn <=100 d Biết trước số lần lặp giới hạn >=100 Câu 18: Số lần lặp câu lệnh: For i:=11 to 100 writeln (i) ;
a 110 b 111 c 90 D 91
Câu 19: Câu lệnh sau sai:
a While a > b a:= a+1; c while a:= a:= a+1; b While a = b a:= a+1; d While a<= a:=a+1; Câu 20: Giá trị trả a thực khối lệnh sau gì?
a := 1;
while a < a:= a+ 1;