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 (Đề 4)

  • 4073 lượt thi

  • 23 câu hỏi

  • 45 phút

Danh sách câu hỏi

Câu 12:

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

Xem đáp án

Đáp án đúng : B


Câu 13:

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

Xem đáp án

Đáp án đúng : A


Câu 14:

Phép toán nào đúng khi số nguyên A là số lẻ:

Xem đáp án

Đáp án đúng : B


Câu 17:

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

Xem đáp án

Đáp án đúng : C


Câu 18:

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

Xem đáp án

Đáp án đúng : D


Câu 19:

Để biên dịch chương trình, trong Pascal ta nhấn tổ hợp phím:

Xem đáp án

Đáp án đúng : B


Câu 22:

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

Xem đáp án

Cách 1:

if (x >= 0) and (y >= 0)

then A:= sqr(x) + sqr(y) + 1 else A:= sqrt(x*y);

Cách 2:

if ( x < 0) and (y < 0)

then A:= sqrt(x*y) else A:= sqr(x) + sqr(y) + 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 3. Thông báo kết quả ra màn hình.

Xem đáp án

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 3 = 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