Đề thi giữa kì 1 Tin học 11 có đáp án (Đề 3)
-
1792 lượt thi
-
23 câu hỏi
-
45 phút
Danh sách câu hỏi
Câu 5:
Cho biến thực x đã được gán giá trị 12.41235. Sau khi thực hiện câu lệnh Writeln(‘x=’ ,x:5:2); thì giá trị của biến x được in ra màn hình là:
Đáp án C
Câu 6:
Xét khai báo biến sau:
Var x, y : real;
c : char;
i, j : byte;
Tổng bộ nhớ dành cho các biến đã khai báo là bao nhiêu byte?
Đáp án A
Câu 7:
Xét biểu thức logic: (n >0) and (n mod 2 = 1). Khẳng định nào sau đây là đúng?
Đáp án D
Câu 8:
Cho khai báo biến sau đây:
Var m, n : integer ;
x, y : real ;
Lệnh gán nào sau đây là sai ?
Đáp án A
Câu 13:
Cho đoạn chương trình sau:
IF <điều kiện> THEN write(x,’la so chan’) ELSE write(x,’la so le’);
Điều kiện là biểu thức logic nào dưới đây?
Đáp án A
Câu 14:
Cho đoạn chương trình:
readln(x,y);
IF x > y THEN F:= 2*x – y ELSE
IF x < y THEN F:= sqr(x) + sqr(y) ELSE F:= 2*x;
Nếu nhập vào từ bàn phím x=0 và y=0 thì giá trị của F là:
Đáp án D
Câu 15:
Cho đoạn chương trình sau:
S := 0 ;
FOR i := 1 to 10 DO
IF i mod 2 = 1 THEN S := S + i ;
Sau khi thực hiện, S có giá trị?
Đáp án C
Câu 16:
Cho đoạn chương trình sau:
T := 0 ;
FOR i := 1 to 10 DO
IF (i mod 3=0) and (i mod 5=0) THEN T := T + 1 ;
Sau khi thực hiện, T có giá trị?
Đáp án A
Câu 17:
Cho đoạn chương trình sau:
T := 0 ; i:=1;
WHILE i <= 10 DO
BEGIN
IF i mod 3 = 0 THEN T := T + i ;
i:=i+1;
END;
Sau khi thực hiện, T có giá trị?
Đáp án A
Câu 19:
Giả sử mảng a gồm các phần tử a[1]=1, a[2]=2, a[3]=3, a[4]=4, a[5]=5.
Cho biết kết quả sau khi thực hiện đoạn chương trình sau:
S:=0;
FOR i:=1 to 5 DO
IF a[i] mod 2 = 1 THEN S:=S+a[i];
writeln(‘S = ’,S);
Đáp án D
Câu 20:
Phát biểu nào sau đây có thể lấy làm biểu thức điều kiện trong cấu trúc rẽ nhánh?
Đáp án D
Câu 21:
Hãy viết các biểu thức toán học sau sang dạng tương ứng trong Pascal:
GIẢI THÍCH
a) abs(sqr(x) + sqrt(x + sqr(x)))
b) (-1/2 <=sin(x)) and (sin(x)<=1/2)
Câu 22:
Cho chương trình Pascal sau:
Program dientich_duongtron;
uses : crt;
const pi = 3.14;
var dt, r = real;
Hãy chỉ ra bốn lỗi có trong chương trình, sau đó hãy sửa lại cho đúng
GIẢI THÍCH
a) uses crt;
b) var dt, r: real;
c) Thiếu readln(r);
d) dt:= pi*sqr(r);
Câu 23:
Viết chương trình tính tổng các giá trị là bội của 5 trong phạm vi từ 1 đến N (Số nguyên dương N được nhập vào từ bàn phím)
GIẢI THÍCH
Program bt_3;
Uses crt;
Var Tong, n, i: integer;
Begin
Clrscr;
Writeln(‘nhap n=’);
Readln (n);
Tong:=0;
For i:=1 to n do
If I mod 5 = 0 then Tong:= Tong+i;
Writeln(‘Tong la:’,Tong);
Readln
End.