Đề kiểm tra 1 tiết tin 8 lần 2

TRƯỜNG THCS LƯƠNG TÂM


ĐỀ KIỂM TRA 1 TIẾT
Năm học: 2014 – 2015
Môn: Tin học 8
Thời gian: 45 phút (Không kể thời gian giao đề)

Họ và tên: ...................................................
Lớp: 8A ……
Điểm
Nhận xét





Bài 1. Khoanh tròn câu trả lời đúng: (2 điểm)
Câu 1: Để in kết quả của biểu thức (5 + 20)*(10 mod 3) lên màn hình, em dùng câu lệnh nào dưới đây:
a. Write(’(5 + 20)*(10 mod 3)’); b. Write((5 + 20)x(10 mod 3));
c. Write((5 + 20).(10 mod 3)); d. Write((5 + 20)*(10 mod 3));
Câu 2: Cú pháp lệnh gán trong khai báo biến:
a. := b. =
c. := d. =
Câu 3: Ta thực hiện các lệnh gán sau :
x:=1; y:=9; z:=x+y;
Kết quả thu được của biến z là:
a. 1 b. 9
c. 10 d. Một kết quả khác
Câu 4: Để thực hiện phép tính tổng của hai số nguyên a và b ta thực hiện như sau :
a. Tong=a+b; b. Tong:=a+b;
c. Tong:a+b; d. Tong(a+b);
Bài 2. Tìm từ, cụm từ thích hợp điền vào chỗ trống: (2 điểm)
a. Biến và hằng là các đại lượng được đặt tên, chúng dùng để
b. Trong Pascal, kết quả của phép chia hai số sẽ là kiểu dữ liệu
c. Kết quả của câu lệnh (15 div 4) bằng:
d. Để chạy chương trình Turbo Pascal, ta nhấn tổ hợp phím
Bài 3. . Hãy tìm lỗi đoạn chương trình sau và sửa lại cho đúng: (2 điểm)
Program Vi du;


Var a,b,c,s= Integer;


Begin


Write(’nhap chieu dai a =’); readln(‘a’);


Write(nhap chieu rong b =); readln(b);


 S := a.b;


 C = 2*(a+b);


Write (’dien tich hinh chu nhat la: ’, ‘S’);


Write (chu vi hinh chu nhat la: ,C);


 Readln


 End.




Bài 4. Hãy viết các biểu thức toán học dưới đây sang ngôn ngữ Pascal: (2 điểm)

a. 152 chia cho 5 lấy dư ( ...................................................................................


( ...................................................................................


(...................................................................................


(...................................................................................
Bài 5. Cho biết giá trị của biến x trong đoạn chương trình sau, nếu trước đó x có giá trị bằng 10 (2 điểm)
If x mod 2=0 then x := x div 2;

x = ......................

If x>=10 then x := x + 2 else x := x*2 ;

x = ......................