KT 1t HKI

Chia sẻ bởi Phạm Huy Tùng | Ngày 26/04/2019 | 57

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:=
* 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)