Bạn đang xem bản rút gọn của tài liệu. Xem và tải ngay bản đầy đủ của tài liệu tại đây (110.27 KB, 3 trang )
<span class='text_page_counter'>(1)</span><div class='page_container' data-page=1>
Phòng GD-ĐT TX Quảng Trị
Trường THCS Thành Cổ
BÀI KIỂM TRA MÔN TIN 8
Thời gian 45 phút
Họ và tên : ………..lớp 8...
Điểm Lời phê của thầy cô giáo
<i><b>A) TRẮC NGHIỆM (2 điểm)</b></i>
<i>Chọn đáp án đúng (trong ngơn ngữ lập trình Pascal)</i>
1. Hằng được khai báo bởi từ khóa:
a) Var
b) Const
c) Program
d) Uses
2. Khai báo nào sau đây là đúng?
a) var diem tb: real;
b) const x:=5;
c) var bankinh : integer;
d) const chu-vi = 6;
3. Cho biến a, b kiểu số thực, biến Sum kiểu số nguyên. Hãy chọn câu đúng
a) Sum := a*b;
b) Sum := a/b;
c) Sum := a + b;
d) Cả a, b, c đều sai.
4. Cho x, y, z là các biến có cùng kiểu dữ liệu số, ta thực hiện các lệnh gán sau: x := 1;
y := 9; x := y; y := x + y; ) Kết quả thu được của biến y là:
a) 1 ;
b) 18 ; c) 10 ;d) 9 ;
<i><b>B) TỰ LUẬN (8 điểm)</b></i>
<i><b>Câu 1 (1,5 đ): Trong các ngôn ngữ lập trình biến nhớ có tác dụng gì? Nêu sự khác nhau của</b></i>
hằng và biến nhớ.
<i><b>Câu 2 (1,5 đ): Chuyển các biểu thức toán học sau đây sang biểu thức trong ngơn ngữ lập </b></i>
trình Pascal
a) (x2 <sub>+ 6) + </sub> <i>3+ x</i>
<i>5 x</i>
b) Với hai số nguyên a và b, a chia hết cho b
<i><b>Câu 3(2 đ): Hãy đánh dấu (*) vào sau mỗi câu lệnh sai của chương trình sau rồi sửa chương </b></i>
trình lại cho đúng và cho biết kết quả khi chạy chương trình
Program tinh_tong_thuong;
Var tong, so1, so2:integer
Begin
So1=20;
So2=4;
Tong := so1+so2;
Write(‘tong 2 so =’,tong);
Write(‘thuong 2 so = so1/so2);
Readln;
End
<b>Sửa lại</b>
<i><b>Câu 4(1đ): Sắp xếp các câu lệnh của chương trình sau theo đúng thứ tự để được một chương </b></i>
trình đúng
Program tong
Var dt: real;
rong, dai:integer;
Uses crt;
Begin
dt := dai*rong;
Write (‘nhap chieu dai ’);
Readln (dai);
Write (‘dien tich hinh chu nhat la ’,dt);
Readln (rong);
Write (‘nhap chieu rong ’);
Readln;
Clrscr;
End.
Sửa lại
...
...
...
...
...
...
...
...
...
...
...
...
<i><b>Câu 4(2đ): Viết chương trình in ra màn hình các dịng chữ có vị trí như sau (có phần khai </b></i>
<i>báo tên).</i>
Phong GD-DT TX Quang Tri
Truong THCS Thanh Co
BAI KIEM TRA MON TIN 8
Thoi gian 45 phut
Ho ten : ………..lop: ...
<b>Bài làm</b>
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
...
<i><b>A) TRẮC NGHIỆM (2 điểm)</b></i>
<i><b>Câu 1 (1,5 đ):</b></i>
Biến dùng để lưu trữ dữ liệu
Sự khác nhau của hằng và biến nhớ là trong khi thực hiện chương trình giá trị của biến có thể
thay đổi, cịn giá trị của hằng thì khơng thay đổi.
<i><b>Câu 2 (1,5 đ)</b></i>
a) (x*x+ 6) + (3+x)/(5*x) b) a mod b = 0
<i><b>Câu 3(2đ): </b></i>
<i><b>Phát hiện chổ sai (0,5đ)</b></i>
Program tinh_tong_thuong;
Var tong, so1,so2:integer*
Begin
So1=20; *
So2=4; *
Tong := so1+so2;
Write(‘tong 2 so =’,tong);
Write(‘thuong 2 so = so1/so2);*
Readln;
End *
<i><b>Sửa lại (1đ)</b></i>
Program tinh_tong_thuong;
Var tong, so1,so2:integer;
<b>So1:=20; </b>
<b>So2:=4; </b>
Tong := so1+so2;
Write(‘tong 2 so =’,tong);
Write(‘thuong 2 so = ’, so1/so2);
Readln;
<i>End. </i>
<i><b>Kết quả khi chạy chương trình (0.5đ) tổng là 24, thương là 5 </b></i>
<i><b>Câu 4 (1đ): </b></i>
Program tong;
Var dt: real;
rong, dai:integer;
Uses crt;
Begin
dt := dai*rong;
Write (‘nhap chieu dai ’);
Readln (dai);
Write (‘dien tich hinh chu nhat la ’,dt);
Write (‘nhap chieu rong ’);
Readln;
Clrscr;
End.
<b>Sửa lại</b>
Program tong;
Var dt: real;
rong, dai:integer;
Uses crt;
Begin
Clrscr;
Write (‘nhap chieu dai ’);
Readln (dai);
Write (‘nhap chieu rong ’);
Readln (rong);
dt := dai*rong;
Write (‘dien tich hinh chu nhat la ’,dt);
Readln;
End.
<i><b>Câu 4(2đ): chương trình </b></i>
Program kiemtra;
Begin
Writeln(‘Phong GD-DT TX Quang Tri’);
Writeln(‘Truong THCS Thanh Co);
Writeln(‘ BAI KIEM TRA MON TIN 8);
Writeln(‘ Thoi gian 45 phut);
Writeln;