I/Trắc nghiệm
1.Với x là kiểu số nguyên,phép gán nào sau đây đúng?
A.x:=5/2 B.x:=x*(3/2) C.x:=x*0.1 D.x:=x*5
2.Ý nghĩa của lệnh clrscr.
A.Khai báo sử dụng thư viện chuẩn trong chương trình
B.Xóa chương trình
C.Dừng chương trình
3.Muốn tạm dừng chương trình để xem kết quả bài lập trình ta dùng lệnh nào sau đây?
A.End. B.Writeln; C.Uses crt; D.Readln;
4.Tên nào sau đây do người lập trình đặt?
A.Var B.Real C.End D.Ctdt
5.Lệnh khai báo tên chương trình trong ngôn ngữ lập trình là?
A.Begin B.Uses C.Var Program
6.Trong Pascal,lệnh clrscr dùng để:
A.In thông tin ra màn hình B.Xóa màn hình C.Nhập dữ liệu từ bàn phím D.Tạm dừng ctrình
7.Đặt tên ntn là hợp lệ?
A.Tam giac; B.Tamgiac; C.1Lơp8A; D.Lop.8A;
8.Để nhập dữ liệu ta dùng lệnh
A.Readln(x); B.X:='dulieu'; C.Write('Nhap du lieu');
9.Trong Pascal,khai báo nào sau đây là đúng?
A.Var tb:real; B.Var X:=100; C.Conts X:integer; D.Var R=15;
10.Để lưu tệp chương trình trong Pascal ta nhấn phím
A.F2 B.F3 C.F5 D.F9
11.Để thoát khỏi ctrinh Pascal ta dùng tổ hợp phím
A.Ctrl+X B.Ctrl+F9 C.Alt+F9 D.Alt+X
12.Giả sử A được khai báo là biến với kiểu số nguyên,X là biến được khai báo với kiểu dữ liệu xâu.Khoanh vào các phép gán đúng:
A.A:=9; B.X:=234; C A:=1.5; X:='Lao Cai';
13.Phép gán nào đúng
A.Var n: integer; B.Var R=30; C.Const n: real; D.Var 6:=integer;
II/Tự luận
1.Tìm lỗi sai và sửa lại
Program bai - tap;
Var a,b,c, TB = Integer;
Const n:= 3
Begin
Writeln('nhap vao ba so a,b,c);
Readln(a,b,c)
TB : = (a+b+c)/n ;
Writeln('Trung binh cong cua 3 so da cho la;TB');
Readln
End
2.Viết ctrinh nhập vào từ bàn phím độ dài cạnh a của 1 hình vuông bất kì,in ra màn hình chu vi,diện tích của hình vuông đó
3.Viết ctrinh đưa ra tb trên màn hình.Mỗi tb nằm trên 1 dòng
PHONG GIAO DUC VA DAO TAO TX QUANG TRI
TRUONG THCS THANH CO
TEN EM LA:....................
4.Viết chương trình Pascal nhập vào từ bàn phím độ dài 2 cạnh hình chữ nhật bất kỳ,in ra màn hình chu vi,diện tích hình chữ nhật đó.