Đang tải... (xem toàn văn)
Quy định về phạm vi giá trị và kích thước bộ nhớ lưu trữ một giá trị của các kiểu dữ liệu chuẩn trong mọi ngôn ngữ lập trình là như nhau;.. Câu 17: Cho S và i là biến nguyên..[r]
(1)BỘ GIÁO DỤC VÀ ĐÀO TẠO ĐỀ KIỂM TRA TIẾT MÔN: Tin Học Thời gian làm bài: phút;
(24 câu trắc nghiệm)
Họ, tên thí sinh: A PHẦN TRẮC NGHIỆM
Câu 1: Để nhập giá trị cho biến số nguyên N từ bàn phím ta sử dụng thủ tục ?
A Writeln(N) B Writeln C Readln(N) D Write(N)
Câu 2: Cho x, y, z ba biến nguyên Cách nhập giá trị sau sai muốn nhập giá trị 3, 4, cho ba biến từ bàn phím câu lệnh readln(x,y,z); ?
A Gõ 3, 4, sau nhấn phím Enter (giữa hai số liên tiếp gõ dấu phẩy);
B Gõ sau nhấn phím Enter gõ sau nhấn phím Enter gõ sau nhấn phím Enter;
C Gõ sau nhấn phím Tab gõ sau nhấn phím Tab gõ sau nhấn phím Enter;
D Gõ 3, 4, sau nhấn phím Enter (giữa hai số liên tiếp gõ dấu cách); Câu 3: Để thoát khỏi Turbo Pascal thực hiện:
A Nhấn tổ hợp phím Alt + X B Nhấn tổ hợp phím Alt + F3 C Nhấn tổ hợp phím Ctrl + X D Nhấn tổ hợp phím Ctrl + F3
Câu 4: Cho x y biến khai báo kiểu thực, câu lệnh sau ? A Readln(x:5:2); B Readln(x,y); C Readln(x,5); D Readln( ‘ x= ’ , x); Câu 5: Trong ngơn ngữ lập trình Pascal đoạn chương trình sau thực cơng việc gì?
T:=0;
For i:=1 To N Do
If (i mod = 0) or (i mod 5= 0) Then T:=T+i; A Tìm ước N;
B Tính tổng số chia hết cho phạm vi từ đến N; C Tính tổng số chia hết cho phạm vi từ đến N; D Tính tổng ước thực N;
Câu 6: Phát biểu sai ?
A Cách khai báo biến ngơn ngữ lập trình khác khác nhau;
B Trong Pascal biến kiểu khai báo danh sách biến, biến cách dấu phẩy;
C Kiểu liệu biến phải kiểu liệu chuẩn;
D Hai biến phạm vi hoạt động (ví dụ khai báo var) không trùng tên;
Câu 7: Biểu thức sau khơng có kết 1?
A (sqrt(25) div 4) B (sqrt(25) / 4) C (sqrt(25) mod 4) D (sqrt(25) div 5) Câu 8: Hãy chọn phương án ghép Biểu thức : 25 mod + / * có giá trị :
A 8.5; B 8.0; C 8.5; D 15.0
Câu 9: Trong khai báo biến sau, khai báo sai?
A Var x1,x2: Integer; B Var x1,x4: Longint;
(2)Câu 10: Xét chương trình sau: Var a,b:integer;
BEGIN
a := 1; b := 2; b := b + a; a := a + b; writeln(a); END;
Kết a chạy hết đoạn chương trình là:
A B C D
Câu 11: Đoạn chương trình sau cho kết gì? For i:=10 Downto Do Write(i ,' ');
A 10987654321 B Đa 10 dấu cách
C 10 D 10
Câu 12: Hãy xếp thao tác sau cho trình tự thực sử dụng máy tính giải tốn ngơn ngữ lập trình pascal
1 Soạn thảo (gõ) chương trình Khởi động Pascal 3.Dịch chương trình Thực chương trình
A 1-3-2-4 B 1-2-3-4 C 2-1-3-4 D 2-3-4-1
Câu 13: Kết biểu thức sqrt((ABS(25-50) div 2)) là?
A B C D
Câu 14: Cho đoạn chương trình: IF A>B then
Begin
TG:=A; A:=B; B:=TG; End;
Với A=10 B=5 kết A, B sau thực đoạn chương trình là? A A= B=10 B A=10 B=5 C A,B,C sai D A=15 B=10 Câu 15: Trường hợp sau lệnh gán Pascal ?
A d := 50 ; B a := 10 ; C d:= a*2 ; D a + b := 1000 ;
Câu 16: Chọn phát biểu phát biểu sau : A Dữ liệu kiểu kí tự có 256 giá trị;
B Dữ liệu kiểu byte có 256 giá trị từ 0, 1, 2, …, 255;
C Mọi ngôn ngữ lập trình có kiểu liệu chuẩn : kiểu nguyên, kiểu thực, kiểu kí tự, kiểu lôgic;
D Quy định phạm vi giá trị kích thước nhớ lưu trữ giá trị kiểu liệu chuẩn ngơn ngữ lập trình nhau;
Câu 17: Cho S i biến nguyên Khi chạy đoạn chương trình : s:=0;
for i:=1 to 10 s := s+i; writeln(s);
(3)A Cả mệnh đề sai;
B Chỉ số biến số liên kết với phép tốn; C Hằng số khơng biểu thức số học;
D Biến số không biểu thức số học;
Câu 19: Thực chương trình Pascal sau :
Ta thu kết ?
A 64.5; B 6; C 5; D 15;
Câu 20: Cho đoạn chương trình sau: x:=x+1;
If x <= 101 then x: =x+1 Else x:=x-1;
Cho x=102 kết x bao nhiêu?
A 101 B 103 C 99 D 102
Câu 21: Cho khai báo biến sau (trong Pascal) :
Lệnh gán sau sai ?
A x := 6.6 ; B z := ; C m := -4 ; D y := +10.5 ;
Câu 22: Hãy chọn phương án ghép Biểu thức : 25 div + / * có giá trị :
A 15.0; B 15.5; C 8.5; D 8.0;
Câu 23: Trong ngơn ngữ lập trình Pascal đoạn chương trình sau thực cơng việc gì? T:=0;
For i:=1 To N Do
If (i mod = 0) or (i mod 5= 0) Then T:=T+i; A Tìm ước N;
B Tính tổng ước thực N;
C Tính tổng số chia hết cho phạm vi từ đến N; D Tính tổng số chia hết cho phạm vi từ đến N; Câu 24: Cho đoạn chương trình sau:
x:=x+1;
If x <= 101 then x: =x+1 Else x:=x-1;
Cho x=100 kết x bao nhiêu?
A 101 B 99 C 102 D 103
Var a, N : integer ; BEGIN
N := 645 ; A := N mod 10 ; N := N div 10 ; A := A + N div 10 ; A := A + N mod 10 ; Write(N);
END
Var m, n : integer ; x, y : real ;
(4)B PHẦN TỰ LUẬN 1 Cho chương trình sau:
Program Bai tap; {dong 1}
Const a: 100; {dong 2}
Var m,n,i: Interger; {dong 3}
Begin {dong 4}
N:= 0; {dong 5}
While i a n = n+3; {dong 6} Writeln(‘n=’;n); {dong 7}
Realdn; {dong 8}
End {dong 9}
a Hãy tìm sửa lỗi chương trính (2đ)
(5)