Chủ nhật, 22/12/2024
IMG-LOGO
Trang chủ Lớp 11 Tin học Top 4 Đề thi Tin học 11 Học kì 1 có đáp án

Top 4 Đề thi Tin học 11 Học kì 1 có đáp án

Đề thi Học kì 1 Tin học 11 có đáp án (Đề 1)

  • 1701 lượt thi

  • 23 câu hỏi

  • 45 phút

Danh sách câu hỏi

Câu 4:

Câu lệnh y:= (((x - 2)*x - 3)*x - 4)*x - 5; tính giá trị của biểu thức nào?

Xem đáp án

Đáp án C


Câu 11:

Trong pascal, biểu diễn exp(x) có nghĩa là:

Xem đáp án

Đáp án D


Câu 14:

Biểu thức nào không phải là biểu thức trong Pascal?

Xem đáp án

Đáp án C


Câu 15:

Phép toán nào đúng khi số nguyên A chia hết cho 5

Xem đáp án

Đáp án B


Câu 17:

Để nhập giá trị cho 3 biến a, b và c ta dùng lệnh:

Xem đáp án

Đáp án C


Câu 18:

Để đưa ra màn hình giá trị của biến a và biến b kiểu nguyên ta dùng lệnh

Xem đáp án

Đáp án A


Câu 22:

Viết câu lệnh rẽ nhánh tính:

Xem đáp án

GIẢI THÍCH

Cách 1:

if (x >= 1) or (x <= 0)

then D:= -2*x + 1 else D:= sqr(x) + 2*x + 1;

Cách 2:

if (0 < x) and (x < 1)

then D:= sqr(x) + 2*x +1 else D:= -2*x + 1;


Câu 23:

Viết chương trình:

- Nhập mảng một chiều các số nguyên (không quá 100 phần tử).

- Đếm và tính tổng các số chẵn và là bội của 5. Thông báo kết quả ra màn hình.

Xem đáp án

GIẢI THÍCH

Program bt_3;

Uses crt;

Var a: array[1..100] of integer;

Dem, Tong, n, i: integer;

Begin

Clrscr;

 Writeln(‘nhap so phan tu, n=’);

 Readln (n);

 for i := 1 to n do

 begin

 writeln(‘nhap gia trij phan tu thu ’,i,’ =’);

 readln(a[i]);

 end;

 Dem:=0;

 Tong:=0;

 For i:=1 to n do

 If (a[i] mod 2 = 0) and (a[i] mod 5 = 0) then

 begin

 Dem:= Dem+1;

 Tong:= Tong+a[i];

 end;

 writeln(‘Dem la:’,Dem);

 Writeln(‘Tong la:’,Tong);

 Readln

End.


Bắt đầu thi ngay