Tập hợp các kí hiệu và quy tắc viết các lệnh tạo thành một chương trình hoàn chỉnh và thực hiện được trên máy tính.. Tập hợp các kí hiệu và quy tắc viết các lệnh tạo thành một chương t[r]
(1)LỚP
I TRẮC NGHIỆM: Khoanh tròn vào chữ trước câu trả lời đúng
Câu 1: Chương trình máy tính tạo gồm bước nào? A Viết chương trình ngơn ngữ lập trình
B Dịch chương trình thành ngơn ngữ máy
C Viết chương trình ngơn ngữ lập trình dịch chương trình thành ngơn ngữ máy
D Viết chương trình giấy gõ vào máy tính Câu 2: Chương trình dịch làm ?
A Dịch từ ngơn ngữ lập trình sang ngơn ngữ máy B Dịch từ ngơn ngữ lập trình sang ngơn ngữ tự nhiên C Dịch từ ngôn ngữ máy sang ngôn ngữ lập trình D Dịch từ ngơn ngữ máy sang ngơn ngữ tự nhiên Câu 3: Ngơn ngữ lập trình là:
A Tập hợp kí hiệu quy tắc viết lệnh tạo thành chương trình hồn chỉnh thực máy tính
B Tập hợp kí hiệu quy tắc viết lệnh tạo thành chương trình hồn chỉnh
C Tập hợp kí hiệu để viết lệnh tạo thành chương trình hồn chỉnh
D Tập hợp quy tắc viết lệnh tạo thành chương trình hồn chỉnh thực máy tính
Câu 4: Đâu từ khoá:
A Program, end, begin B Program, end, begin, Readln, lop82 C Program, then, mot, hai,ba D Lop82, uses, begin, end
Câu 5: Program từ khoá dùng để:
A Khai báo tiêu đề chương trình B Kết thúc chương trình C Viết hình thông báo D Khai báo biến
Câu 6: Tên ?
A Lop 8a B Lop8/a C Lop8a D 8a
Câu 7: Tên sai ?
A Chuong_trinh B Baitap1
C A4H D hoa@yahoo.com
(2)A Khai báo B Khai báo thân C Tiêu đề, khai báo thân D Thân
Câu 9: Phần chương trình Pascal bắt buộc phải có
A Thân B Khai báo
C Khai báo thân D Tiêu đề
Câu 10: Trong tên sau đây, tên không hợp lệ ngôn ngữ Pascal?
A TINHS B DIENTICH
C DIEN TICH D TIMS
Câu 11: Để thoát khỏi Pascal ta sử dụng tổ hợp phím:
A Alt + F9 B Alt +X C Ctrl+ F9 D Ctrl + X Câu 12: Kết in hình câu lệnh Writeln(‘5+20 = ‘, 20+5); là:
A 5+20=25 B 5+20=20+5 C 20+5=25 D 25 = 25 Câu 13: Phần nguyên phép chia hai số nguyên 16 là: A 16 div = B 16 mod =
C 16 div = D 16 mod =
Câu 14: Lệnh khai bá o thư viê ̣n ngôn ngữ lâ ̣p trình Pascal là A Begin B Uses C Program D Var
Câu 15: Trong Pascal, gõ từ khóa cho biết điểm bắt đầu phần thân chương trình, ta có thể viết
A begin B BEGIN C Begin D Cả câu đều đúng Câu 16: Trong Pascal, lệnh clrscr được dùng để
A Xóa màn hình B In thông tin màn hình C Nhập dữ liê ̣u từ bàn phím D Ta ̣m dừng chương trình
Câu 17: Từ khóa dùng để khai báo ngơn ngữ lập trình Pascal là:
A Const B Var
C Real D.End
Câu 18: Để nhập liệu ta dùng lệnh
A Clrscr; B Readln(x);
C X:= ‘dulieu’; D Write(‘Nhap du lieu’);
Câu 19: Các câu lệnh Pascal sau viết hay sai? A if x:= then a = b; B if x > 4; then a:= b;
C if x > then a:=b; m:=n; D if x > then a:=b; else m:=n; Câu 20: Trong chương trình Turbo Pascal, tổ hợp phím Alt + F9 dùng để:
(3)Câu 21: Trong chương trình Turbo Pascal từ khố dùng để khai báo tên chương trình là:
A uses B Begin C Program D End Câu 22: Trong tên sau, tên hợp lệ ngôn ngữ Pascal: A Dien tich; B Begin;
C Tamgiac; D 5-Hoa-hong; Câu 23: Để tìm giá trị lớn số a, b ta viết: A Max:=a;If b>Max then Max:=b;
B If (a>b) then Max:=a;If (b>a) then Max:=b; C Max:=b;If a>Max then Max:=a;
D Cả câu
Câu 24: Biến a nhận giá trị ; -1 ; ; 2,3 Ta khai báo a thuộc kiểu liệu nào?
A Integer B Char
C Real D Integer Longint
Câu 25: If Then Else là:
A Vòng lặp xác định B Vịng lặp khơng xác định C Câu lệnh điều kiện D Một khai báo
Câu 26: Kiểu liệu Integer có giá trị lớn
A 32768 B 32767
C tỉ D -32768 +32767
Câu 27: a biến liệu kiểu số nguyên Muốn xuất giá trị a2
ta viết
A Writeln('a*a') B Readln(' a*a ') C Writeln(a*a) D Writwln(a2)
Câu 28: IF a>8 THEN b:=3 ELSE b:=5; Khi a nhận giá trị b nhận giá trị nào?
A B C D
Câu 29: Khi soạn thảo xong chương trình Pascal, ta muốn lưu chương trình lại ta nhấn phím:
A F9 B Ctrl + F9 C F2 D Ctrl + F2 Câu 30: Khi soạn thảo xong chương trình Pascal, ta muốn kiểm tra xem có lỗi khơng ta nhấn phím:
A F9 B F3 C F2 D F1
Câu 31: Khi chương trình Pascal hết lỗi, ta muốn chạy chương trình nhấn phím:
A F9 B Ctrl + F9 C F2 D Ctrl + F2 Câu 32: Viết biểu thức toán a3-b3 sang Pascal ta viết là:
A a3-b3 B a*a*a-b*b*b
(4)Câu 33: Để thực phép tính tổng hai số nguyên a b ta thực hiện sau :
A Tong=a+b; B Tong:=a+b;
C Tong:a+b; D Tong(a+b);
Câu 34: Câu lệnh điều kiện dạng đầy đủ là: A If < đk > then < câu lệnh 1> Else <câu lệnh 2>; B If <đk > then < câu lệnh>;
C If <đk> then < câu lệnh 1>,<câu lệnh 2>; D Cả a,b,c sai
Câu 35: Trong ngơn ngữ lập trình Pascal, từ khơng phải từ khóa là:
A Uses B Program C End D Computer
Câu 36: Dãy kí tự 20n10 thuộc kiểu liệu
A String B Integer C Real D Char
Câu 37: Tên hợp lệ ngôn ngữ Pascal là:
A 16abc; B Hinh thang; C D15; D Program; Câu 38: Từ khóa để khai báo biến ngơn ngữ lập trình Pascal là:
A Const B Var C Real D End
Câu 39: Để chạy chương trình Pascal ta nhấn tổ hợp phím A Ctrl+F9 B Alt+F9
C Shitf+F9 D Ctrl+Shift+F9
Câu 40: Cấu trúc chung hợp lý chương trình Pascal là: A Begin -> Program -> End B Program -> End -> Begin C End -> Program -> Begin D Program -> Begin -> End Câu 41: Phần dư phép chia hai số nguyên 16 là: A 16 div = B 16 mod =
C 16 div = D 16 mod =
Câu 42: A khai báo biến với kiểu liệu số nguyên, X biến với kiểu liệu xâu Phép gán hợp lệ là:
A A:= 4.5; B X:= ‘1234’; C X:= 57; D A:=‘LamDong’; Câu 43: Trong Pascal khai báo sau đúng:
A Var hs : real; B Var 5hs : real; C Const hs : real; D Var S = 24;
Câu 44: Chương trình sau cho kết gi ? Program vd;
Var a, b,: real; x,: integer ; Begin readln(a, b);
(5)End
A Xuất hình số nhỏ số a, b nhập B Xuất hình số lớn số a, b nhập
C Chương trình khơng thực lỗi khai báo kiểu liệu D Đảo giá trị biến a, b cho
Câu 45: Từ sau khơng phải từ khố?
A Sqrt B Begin
C Var D Program
Câu 46: Câu lệnh sau khai báo hằng: A Const n = 20; B Const n : 20;
C Const n := 20; D Const n 20;
Câu 47: Tên sau người lập trình đặt:
A Var B Real
C End D n
Câu 48: Khai báo sau đúng:
A Program V D; B Program Vi_du; C Program VD D Program: V_D; Câu 49: Câu lệnh sau câu lệnh gán?
A x = B x:
C x and D x:= x +5;
Câu 50: Câu lệnh sau dùng để nhập số từ bàn phím vào biến x?
A Writeln(‘Nhập x = ’); B Write(x);
C Writeln(x); D Readln(x);
Câu 51: Câu lệnh sau dùng để in giá trị lưu biến x màn hình?
A Writeln(x); B Write(x);
C Write(x: 3); D Cả A, B, C Câu 52: Câu sau nói biến: A Biến đại lượng người lập trình đặt
B Biến có giá trị khơng đổi suốt trình thực chương trình C Có số biến có sẵn chương trình, khơng cần khai báo
D Tên biến phải bắt đầu số
Câu 53: Trong Pascal, muốn dịch chương trình ta dùng tổ hợp phím nào sau đây:
A Alt + F9 B Ctrl + F9 C Alt + F3 D Ctrl + S Câu 54: Số biến khai báo tối đa chương trình bao nhiêu?
A Chỉ biến cho kiểu liệu B 10 biến
C Chỉ hạn chế dung lượng nhớ D Không giới hạn Câu 55: Biến khai báo với kiểu liệu số thực lưu giá trị giá trị :
(6)B Một số thực (có thể số nguyên) phạm vi cho phép C Một số thực
D Một dãy chữ số
Câu 56: Chọn câu lệnh Pascal hợp lệ câu sau : A If x : = a + b then x : = x + 1;
B If a > b then max = a;
C If a > b then max : = a ; else max : = b; D If = then x : = 100;
II TỰ LUẬN Đề 1:
Câu 1:Hãy viết lại biểu thức sau sang dạng biều diễn tương ứng Pascal:
a)
a a2 )1
( b)
y x
c)(2a2 + 2c2 - a) : d)
y x
y x
Câu 2: Hãy mơ tả thuật tốn giải phương trình bậc ax +b = Câu 3: Viết chương trình in hình diện tích chu vi hình vng Đề
Câu 1: Chuyển biểu thức viết Pascal sau thành biểu thức toán học:
a) (a*a*a+b*x-8)/2 b) (x*x+y)/(x-y*y)
c) (2*a-b*b)/(a+b) d) (x-y/3)*(x+y)
Câu : Hãy mơ tả thuật tốn tính tổng phần tử dãy số A gồm a1,
a2,…, an cho trước
Câu : Viết chương trình in hình diện tích chu vi hình chữ nhật
Đề
Câu : Viết chương trình tính tổng, tích hiệu hai số nhập từ bàn phím
Câu : Hãy mơ tả thuật tốn tìm số nhỏ dãy A số a1,
a2,…,an cho trước
Câu : Tìm lỗi sai sửa chương trình sau : Begin
Program vd Uses crt ; Clrscr ;
Writeln(‘Chao cac ban !’) End
readln Đề
(7)a) Tính diện tích hình tam giác
b) Tính tổng 100 số tự nhiên
Câu 2: Hãy mơ tả thuật tốn tìm số lớn dãy A số a1, a2,…,
an cho trước
Câu 3: Viết chương trình kiểm tra ba số a, b, c có ba cạnh tam giác hay không với a, b, c ba số nhập từ bàn phím
- The End -
ĐÁP ÁN I TRẮC NGHIỆM
Đáp án Đáp án Đáp án
Câu C Câu 21 C Câu 41 B
Câu A Câu 22 C Câu 42 B
Câu A Câu 23 D Câu 43 A
Câu A Câu 24 C Câu 44 C
Câu A Câu 25 C Câu 45 A
Câu C Câu 26 B Câu 46 A
Câu D Câu 27 C Câu 47 D
Câu C Câu 28 B Câu 48 B
Câu A Câu 29 C Câu 49 D
Câu 10 C Câu 30 A Câu 50 D
Câu 11 B Câu 31 B Câu 51 D
Câu 12 A Câu 32 B Câu 52 A
Câu 13 C Câu 33 B Câu 53 B
Câu 14 B Câu 34 A Câu 54 D
Câu 15 D Câu 35 D Câu 55 B
Câu 16 A Câu 36 A Câu 56 B
Câu 17 A Câu 37 C
Câu 18 B Câu 38 B
Câu 19 C Câu 39 B
Câu 20 A Câu 40 D
II.TỰ LUẬN Đề
Câu 1:
a) (a*a + 1) – 3/a b) x+ y*y*y
(8)-B1: Xác định hệ số a b
-B2: Nếu a=0 b=0 thơng báo pt có vơ số nghiêm chuyển đến B5 -B3: Nếu a=0 b≠0 thơng báo pt vơ nghiệm chuyển đến B5 -B4: Nếu a≠0 nghiệm pt x=-b/a chuyển đến B5
-B5: Kết thúc Câu 3:
Program hinh_vuong; Uses crt;
Var a:integer; s,p:real; Begin clrscr;
write('Nhap dai canh: ');readln(a); s:=a*a;
p:=4*a;
writeln('Dien tich hinh vuong: ',s:4:0); writeln('Chu vi hinh vuong: ',p:4:0); readln
End Đề Câu :
a) (a3 + bx -8):2 b) (x2 +y): (x – y2)
c) (2a – b2): (a+b) d) (x -
3 y
)(x + y)
Câu 2: Mơ tả thuật tốn:
- Bước 1: Nhập phần tử dãy A: a1, a2, , an
- Bước 2: S←0; i←0; - Bước 3: i←i+1;
(9)- Bước 6: Đưa kết S hình - Bước 7: Kết thúc
Câu 3:
Program hcn; Uses crt;
Var a,b:integer; s,p:real; Begin clrscr;
write('Nhap chieu dai: ');readln(a); write('Nhap chieu rong: ');readln(b); s:=a*b;
p:=(a+b)*2;
writeln('Dien tich hinh chu nhat: ',s:4:0); writeln('Chu vi hinh chu nhat: ',p:4:0); readln
End Đề Câu 1:
Program baitap; Uses crt;
Var a,b:integer; tong,tich,hieu:real; Begin
clrscr;
write('Nhap a= ');readln(a); write('Nhap b= ');readln(b); tong:=a+b;
tich:=a*b; hieu:=a-b;
writeln('Tong a va b la: ',tong:4:0); writeln('Tich a va b la: ',tich:4:0); writeln('Hieu a va b la: ',hieu:4:0); readln
End
Câu 2:
Mơ tả thuật tốn:
- Bước 1: Min←a1;i←1;
- Bước 2: i←i+1;
- Bước 3: Nếu i>n, chuyển đến B5
(10)- Bước 5: Kết thúc Câu 3:
Program vd; Uses crt ; Begin Clrscr ;
Writeln(‘Chao cac ban !’); readln
End Đề
Câu 1:
a) Input: Độ dài cạnh đường cao tương ứng với cạnh Output: Diện tích hình tam giác
b) Input: Dãy 100 số tự nhiên đầu tiên: 1, 2, …, 100 Output: S= 1+2+ … + 100
Câu 2:
Mơ tả thuật tốn:
- Bước 1: Max←a1;i←1;
- Bước 2: i←i+1;
- Bước 3: Nếu i>n, chuyển đến B5
- Bước 4: Nếu ai>Max, Max←ai, quay B2
- Bước 5: Kết thúc Câu 3:
Program tamgiac; Uses crt;
Var a,b,c:integer; Begin
clrscr;
write('Nhap a = ');readln(a); write('Nhap b = ');readln(b); write('Nhap c = ');readln(c);
If (a+b>c) and (b+c>a) and (a+c>b) then writeln('a,b,c la ba canh cua mot tam giac')
else writeln('a,b,c khong la ba canh mot tam giac'); readln