Kiểm tra 15 phút môn Tin học 11

Họ và tên:................................................. Lớp: 11.......
KIỂM TRA 15 PHÚT 
Đề số 01.
Câu 1. (3 điểm)
Hãy sửa lại các lỗi (viết sang bên cạnh) có trong chương trình Pascal sau để được chương trình đúng:
Progam	Bai1;	
Var	a,b,c = integer;	 
Begin	 
	a = 100;	
	b := 200	
	c:=a x b;	
	Write(‘Gia tri cua c la:’,c);	Readln.	
End.	
Câu 2 (3 điểm)
Không thực hiện chương trình, hãy đoán nhận kết quả thực hiện chương trình Pascal sau (Hãy nêu kết quả hiện ra màn hình khi thực hiện chương trình):
Program	Bai2;
Var	x, y: integer;
Begin
	x: = 10;	y:= 20;
	x:= x + 10;
	y:= x-y;
Writeln(‘Gia tri moi cua x= ’, x);
Writeln(‘Gia tri moi cua y= ’, y);
Readln ;
End.
Câu 3 (4 điểm)
Lập chương trình nhập 2 số nguyên a và b vào từ bàn phím. Hãy tính và đưa ra màn hình tổng các số trong khoảng từ a đến b (a<b).
(Phần làm bài câu 2, 3 trình bày ở trang bên)
Họ và tên:................................................. Lớp: 11.......
KIỂM TRA 15 PHÚT 
Đề số 02.
Câu 1. (3 điểm)
Hãy sửa lại các lỗi (viết sang bên cạnh) có trong chương trình Pascal sau để được chương trình đúng:
Program	Bai1;
Var	x,y,z : interger;	 
Begin	:	 
	x := 100;	y := 30	
	z :=x:y;	
	Write(‘Gia tri cuoi cung la: ’, c);	
	Readln;	
End	
Câu 2 (3 điểm)
Không thực hiện chương trình, hãy đoán nhận kết quả thực hiện chương trình Pascal sau (Hãy nêu kết quả hiện ra màn hình khi thực hiện chương trình):
Program	Bai2;
Var	x, y: integer;
Begin
	x: = 10;
	y:= 20;
	x:= y + 10;
	y:= x-y;
	Writeln(‘Gia tri moi cua x= ’, x);
	Writeln(‘Gia tri moi cua y= ’, y);
	Readln
End.
Câu 3 (4 điểm)
Lập chương trình nhập 2 số nguyên x và y vào từ bàn phím. Tính và đưa ra màn hình tích các số trong khoảng từ x đến y (x<y).
(Phần làm bài câu 2, 3 trình bày ở trang bên)
Họ và tên:................................................. Lớp: 11......
KIỂM TRA 15 PHÚT 
Đề số 03.
Câu 1. (3 điểm)
Hãy sửa các lỗi (viết sang bên cạnh) có trong chương trình Pascal sau để được chương trình đúng:
Program	1Baitap;
Var	a,b;c : integer;	 
Begin.	 
	a = 200;	
	b := 10;	
	c:=a.b;	
	Write(‘Gia tri cua c la: ’,c);
	Realln;	
End.
Câu 2 (3 điểm)
Không thực hiện chương trình, hãy đoán nhận kết quả thực hiện chương trình Pascal sau (Hãy nêu kết quả hiện ra màn hình khi thực hiện chương trình):
Program	Bai2;
Var	x, y: integer;
Begin
	x: = 10;
	y:= 20;
	x:= x*3;
	y:= x-y;
	Writeln(‘Gia tri moi cua x= ’, x);
	Writeln(‘Gia tri moi cua y= ’, y);
	Readln ;
End.
Câu 3 (4 điểm)
Lập chương trình nhập 2 số nguyên m và n vào từ bàn phím, đưa ra màn hình tổng các số lẽ trong khoảng từ m đến n (m<n).
(Phần làm bài câu 2, 3 trình bày ở trang bên)
Họ và tên:................................................. Lớp: 11.......
KIỂM TRA 15 PHÚT 
Đề số 04.
Câu 1. (3 điểm)
Hãy sửa các lỗi (viết sang bên cạnh) có trong chương trình Pascal sau để được chương trình đúng:
Program	Bai1;
Var	x,y,z : interger;	 
Begin	 
	x = 40;	
	y := 100	
	z:=x:y;	
	Write(Gia tri cua c la: ,c);
	Readln;	
End.	
Câu 2 (3 điểm)
Không thực hiện chương trình, hãy đoán nhận kết quả thực hiện chương trình Pascal sau:
Program	Bai2;
Var	x, y: integer;
Begin
	x: = 10;
	y:= 20;
	y:= x + 10;
	x:= x-y;
	Writeln(‘Gia tri moi cua x= ’, x);
	Writeln(‘Gia tri moi cua y= ’, y);
	Readln
End.
Câu 3 (4 điểm)
Lập chương trình nhập 2 số nguyên a và b vào từ bàn phím, đưa ra màn hình số lượng các số chia hết cho 5 trong khoảng từ a đến b (a<b).
(Phần làm bài câu 2, 3 trình bày ở trang bên)