KT 1t HKI
Chia sẻ bởi Phạm Huy Tùng |
Ngày 26/04/2019 |
54
Chia sẻ tài liệu: KT 1t HKI thuộc Tin học 11
Nội dung tài liệu:
và tên: …………………………………..Lớp: ……… KIỂM TRA 45Phút (lần 2)– Môn Tin (ĐỀ 2)
HK I - Năm học 2010 - 2011
A. PHẦN TRẮC NGHIỆM () – Chọn câu lời đúng.
C1. Cho A là dãy số nguyên có N phần tử, để xuất ra màn hình các số có chữ số tận cùng là 5 ta viết lệnh?
A. For i:=1 to N do
if a[i] mod 10 = 5 then write(a[i]:5);
B. For i:=1 to N do
if a[i] mod 5 = 0 then write(a[i]:5);
C. For i:=1 to N do write(a[i]:5);
D. Cả A và B đều đúng
C2. Để tính giá trị trung bình của N số nguyên ta viết đọan lệnh nào?
A. tong := 0;
For i:=1 to N do tong :=tong + a[i];
Tb:=tong/n;
B. For i:=1 to N do tong :=tong + a[i];
Tb:=tong/n;
C. tong :=0;
For i:=N downto 1 do tong :=tong + a[i];
Tb:=tong/n;
D. cả A và C đều đúng.
C3: Cần có biến A để lưu trữ một dãy gồm 250 số nguyên. Hãy cho biến khai báo nào sau đây là sai:
A. Type KDay_So=Array[1..250] of Integer;
Var A : Kday_So;
B. VAR A : Integer;
C. Var A : Array[1..250] of Integer;
D. Const Nmax=250 ;
Type Kday_So = Array[1..250] of Integer;
Var A : Kday_So;
C4. Cú pháp để truy xuất một phần tử của biến mảng A là :
A. A(chỉ số) B. A[chỉ số] C. A D. Ai
C5. Đọan chương trình nào sau đây để nhập giá trị cho dãy số nguyên A bất kì?
A . For i:=1 to 10 do Read(a[i]);
B. Write(` N= `); Readln(N);
For i:=1 to 10 do Read(a[i]);
C. Write(` N= `);
For i:=1 to N do Read(a[i]);
D. Write(` N= `); Readln(N);
For i:=1 to N do
begin
Write(`a[`,i,`=`);Readln(a[i]);
end;
C6. Đọan chương trình nào sau đây để xuất ra màn hình giá trị của dãy số nguyên A bất kì?
A. For i:=1 to 10 Read(a[i]);
B. For i:=1 to 10 Write(a[i]:5);
C. For i:=1 to N Write(a[i]:5);
D. Write(` N= `); Readln(N);
For i:=1 to N do Write(`a[`,i,`=`);
C7. Cho A là một mảng chứa 1000 số nguyên. Để đếm xem trong mảng A có bao nhiêu số âm, ta sử dụng đoạn chương trình nào trong các đoạn chương trình sau (biến d dùng để đếm):
A. d:=0; For i:=1 to 1000 do
if (a[i]<0) then d:= d+1;
B. For i:=1 to 1000 do if (a[i]<=0) then d:=d+1;
C. d:=0; For i:=1 to 1000 do
if (a[i]>=0) then d:=d+1;
D. d:=0; For i:=1 to 1000 do
if a[i]<= 0 then d:=+1
Else
d:=d-1;
C8. Đoạn chương trình nào sau đây dùng để tìm giá trị lớn nhất của dãy số B có N phần tử :
A. For i:=1 to N do
if Max < b[i] then Max:=b[i];
B. Max:=a[2];
For i:=2 to N do
if Max < b[i] then Max:=b[i];
C. Max:=a[1];
For i:=2 to N do
if Max < b[i] then Max:=
HK I - Năm học 2010 - 2011
A. PHẦN TRẮC NGHIỆM () – Chọn câu lời đúng.
C1. Cho A là dãy số nguyên có N phần tử, để xuất ra màn hình các số có chữ số tận cùng là 5 ta viết lệnh?
A. For i:=1 to N do
if a[i] mod 10 = 5 then write(a[i]:5);
B. For i:=1 to N do
if a[i] mod 5 = 0 then write(a[i]:5);
C. For i:=1 to N do write(a[i]:5);
D. Cả A và B đều đúng
C2. Để tính giá trị trung bình của N số nguyên ta viết đọan lệnh nào?
A. tong := 0;
For i:=1 to N do tong :=tong + a[i];
Tb:=tong/n;
B. For i:=1 to N do tong :=tong + a[i];
Tb:=tong/n;
C. tong :=0;
For i:=N downto 1 do tong :=tong + a[i];
Tb:=tong/n;
D. cả A và C đều đúng.
C3: Cần có biến A để lưu trữ một dãy gồm 250 số nguyên. Hãy cho biến khai báo nào sau đây là sai:
A. Type KDay_So=Array[1..250] of Integer;
Var A : Kday_So;
B. VAR A : Integer;
C. Var A : Array[1..250] of Integer;
D. Const Nmax=250 ;
Type Kday_So = Array[1..250] of Integer;
Var A : Kday_So;
C4. Cú pháp để truy xuất một phần tử của biến mảng A là :
A. A(chỉ số) B. A[chỉ số] C. A D. Ai
C5. Đọan chương trình nào sau đây để nhập giá trị cho dãy số nguyên A bất kì?
A . For i:=1 to 10 do Read(a[i]);
B. Write(` N= `); Readln(N);
For i:=1 to 10 do Read(a[i]);
C. Write(` N= `);
For i:=1 to N do Read(a[i]);
D. Write(` N= `); Readln(N);
For i:=1 to N do
begin
Write(`a[`,i,`=`);Readln(a[i]);
end;
C6. Đọan chương trình nào sau đây để xuất ra màn hình giá trị của dãy số nguyên A bất kì?
A. For i:=1 to 10 Read(a[i]);
B. For i:=1 to 10 Write(a[i]:5);
C. For i:=1 to N Write(a[i]:5);
D. Write(` N= `); Readln(N);
For i:=1 to N do Write(`a[`,i,`=`);
C7. Cho A là một mảng chứa 1000 số nguyên. Để đếm xem trong mảng A có bao nhiêu số âm, ta sử dụng đoạn chương trình nào trong các đoạn chương trình sau (biến d dùng để đếm):
A. d:=0; For i:=1 to 1000 do
if (a[i]<0) then d:= d+1;
B. For i:=1 to 1000 do if (a[i]<=0) then d:=d+1;
C. d:=0; For i:=1 to 1000 do
if (a[i]>=0) then d:=d+1;
D. d:=0; For i:=1 to 1000 do
if a[i]<= 0 then d:=+1
Else
d:=d-1;
C8. Đoạn chương trình nào sau đây dùng để tìm giá trị lớn nhất của dãy số B có N phần tử :
A. For i:=1 to N do
if Max < b[i] then Max:=b[i];
B. Max:=a[2];
For i:=2 to N do
if Max < b[i] then Max:=b[i];
C. Max:=a[1];
For i:=2 to N do
if Max < b[i] then Max:=
* Một số tài liệu cũ có thể bị lỗi font khi hiển thị do dùng bộ mã không phải Unikey ...
Người chia sẻ: Phạm Huy Tùng
Dung lượng: |
Lượt tài: 0
Loại file:
Nguồn : Chưa rõ
(Tài liệu chưa được thẩm định)