Đề kt tin học 11

KIỂM TRA CHẤT LƯỢNG HỌC KỲ I

Môn Tin học lớp 11, Thời gian 45 phút

ĐỀ 1:

Câu 1: Hãy cho biết phạm vi biểu diễn của các kiểu dữ liệu sau:

1. Integer; 2. Real; 3. Char; 4. Longint;

Câu 2: Viết lại chương trình sau cho đúng và cho biết chương trình thực hiện công việc gì?

Program Tinh;

Var a,Tong, dem, TB, tich: Integer;

Begin

Tong:=0; a:=1; dem:=0; tich:=1;

While a<>0 do

Read(a);

If (a<>0) and ((a mod 2 )=0) Then

Tong:=tong+a

Dem:=dem+1

TB:=tong/dem;

If If (a<>0) and ((a mod 2 )<>0) Then

Tich:=tich*a

Writeln(‘ Trug binh cong la:’,TB);

Writeln(‘Tich tim duoc la:, tich);

readln

End.

Câu 3: Viết chương trinh tinh tích dãy số nguyên từ a đến b (Với a, b là 2 số nguyên dương

được nhập từ bàn phím).

KIỂM TRA CHẤT LƯỢNG HỌC KỲ I

Môn Tin học lớp 11, Thời gian 45 phút

ĐỀ 1:

Câu 1: Hãy cho biết phạm vi biểu diễn của các kiểu dữ liệu sau:

1. Word; 2. Real; 3. Boolean; 4. Extended;

Câu 2: Viết lại chương trình sau cho đúng và cho biết chương trình thực hiện công việc gì?

Program Tinh;

Var a,Tong, dem, TB, tich: Integer;

Begin

Tong:=0; a:=1; dem:=0; tich:=1;

While a<>0 do

Read(a);

If (a<>0) and ((a mod 2 )=0) Then

Tong:=tong+a

Dem:=dem+1

TB:=tong/dem;

If If (a<>0) and ((a mod 2 )<>0) Then

Tich:=tich*a

Writeln(‘ Trug binh cong la:’,TB);

Writeln(‘Tich tim duoc la:, tich);

readln

End.

Câu 3: Viết chương trinh tinh tổng dãy số nguyên từ a đến b (Với a, b là 2 số nguyên dương

được nhập từ bàn phím)