Cho biến a, b kiểu số thực, biến Sum kiểu số nguyên.[r]
Trang 1Phò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 A) TRẮC NGHIỆM (2 điểm) Chọn đáp án đúng (trong ngôn ngữ lập trình Pascal) 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 ; B) TỰ LUẬN (8 điểm) 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 hằng và biến nhớ 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 trình Pascal a) (x2 + 6) + 3+x 5 x b) Với hai số nguyên a và b, a chia hết cho 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 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 Sửa lại
Trang 2
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
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
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áo tên). Phong GD-DT TX Quang Tri Truong THCS Thanh Co BAI KIEM TRA MON TIN 8 Thoi gian 45 phut Ho ten : ……… lop:
Bài làm
ĐÁP ÁN
A) TRẮC NGHIỆM (2 điểm)
1 f) Const; 2 c) var bankinh : integer; 3) d) Cả a, b, c đều sai; 4 b) 18 ;
B) TỰ LUẬN (8 điểm)
Trang 3Câu 1 (1,5 đ):
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
Câu 2 (1,5 đ)
Câu 3(2đ):
Phát hiện chổ sai (0,5đ)
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 *
Sửa lại (1đ)
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
Kết quả khi chạy chương trình (0.5đ) tổng là 24, thương là 5
Câu 4 (1đ):
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
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
Câu 4(2đ): chương trình
Program kiemtra;
Begin
Writeln(‘Phong GD-DT TX Quang Tri’);
Writeln(‘Truong THCS Thanh Co);
Writeln;
Writeln(‘Ho ten : ……… lop: );
End