In ra màn hình 'y=' + 15 div 4 +5(*)
(*) = 3 + 5 = 8
Vậy kết quả sẽ là B.y=8
In ra màn hình 'y=' + 15 div 4 +5(*)
(*) = 3 + 5 = 8
Vậy kết quả sẽ là B.y=8
Câu lệnh Wrieln('y=',20 div 3+4); sẽ in kết quả: A.10. B.y=2. C.2. D.y=10
Câu 1:Câu lệnh Writeln(‘y=’ , 15 div 4 +5); sẽ in ra kết quả:
A. = 8 B. y= 8 C. y= 3 D. = 20
Câu 2: Kí hiệu ≥ (lớn hơn hoặc bằng) trong ngôn ngữ Pascal là:
A. >= B. <= C. => D. <>
Câu 3: Để chia lấy phần nguyên ta dùng phép toán:
A. Div B. : C. Mod D. /
Câu 4: Để viết thông tin ra màn hình, Pascal sử dụng lệnh:
A. Write B. Read; C. Delay; D. Clrscr;
Câu 5: Chuyển biểu thức sau sang kí hiệu của Pascal: 12 ≤ 82 + 9
A. 12 <= 8^2 + 9 B. 12 <= 8*8 + 9 C. 12 <= 82 + 9 D. 12 <> 82 + 9
Câu 6: Ngôn ngữ lập trình gồm những yếu tố nào
A. Tập hợp các ký tự B. Các quy tắc
C. Cả A và B đều đúng D. Ý tưởng – Giải thuật.
Câu 7: Phép toán 17 mod 4 = ?
A. 1 B. 4 C. 4.45 D. 12
Câu 8: Câu lệnh Writeln(‘2+3’); có công dụng gì?
A. In ra màn hình số 5 B. In ra màn hình 2+3 C. In ra màn hình 2+3=5 D. Tất cả đều sai
Câu 9: Trong chương trình pascal, ..........................
A. Phần khai báo đặt trước phần thân B. Phần thân bỏ cũng được
C. A, B đúng D. A, B sai
Câu 10:Trong Pascal khai báo nào sau đây là đúng?
A. var tb: real; B. 4hs: integer; C. Const x: real; D. Var r =30;
2, Kêt quả của câu lệnh For i:=1 to 20 do if i mod 3=2 then write(i:3); *
A.In ra các số lẻ từ 1 đến 20; B. In ra các số chẵn từ 1 đến 20; C. In ra các số chia hết cho 3 từ 1 đến 20; D. In ra các số chia hết cho 3 dư 2 từ 1 đến 20;
3, Trong câu lệnh lặp For i:=3 to 15 do s:=s+i; Có bao nhiêu vòng lặp? *
A. 15; B. 12; C. 13 D. 3;
4, Cho k,m,n nhận giá trị tương ứng 4,5,6; kết thúc câu lệnh sau:X:=n; If ((x mod 2=0)) or (x<=5) then x:=m*k else x:=m div k; thì x có giá trị là ? *
A. 1 B. 0 C. 5. D. 20 5, Cho biết đoạn chương trình Pascal sau đây chương trình thực hiện bao nhiêu vòng lặp?s:=0; n:=0; while s<=5 do n:= n+1;s:= s+n; * A. 3 B. 6 C. 10 D. kết quả khác 6, Cho a,b,c lần lượt nhận giá trị 10,30,20 . Hỏi sau đoạn chương trình Begin X:=a; If x>a then x:=a; if x>b then x:=b;if x>c then x:=c;end; x có giá trị là? * A. 20 B. 10 C. 30 D. Cả ba đáp án đều sai. 7, Cho x:=7; kết thúc câu lệnh If ((x mod 3=0)) and (x<=8) then x:=x+10; thì x có giá trị là ? * A. 8 B. 10 C. 17 D. 7 8, Cho s và i là biến nguyên. Khi chạy đoạn chương trình s := 1; for i:=1 to 5 do s := s+i; Kết quả in lên màn hình là của s là ? * A. 15 B. 16 C. 11 D. 22 9, Cho biết đoạn chương trình Pascal sau đây, khi kết thúc giá trị của S bằng bao nhiêu? S:=0; n:=0;while S<=3 do begin n:= n+1;S:= s+n; end; * A. 15 B. 10 C. 6 D. 3Cho dãy A gồm N phần tử A1, A2, ... , AN. Hãy xếp thứ hạng cho các phần tử của dãy số trên biết hai số bằng nhau có cùng thứ hạng, số lớn nhất xếp hạng 1, số lớn thứ 2 xếp hạng 2,... In kết quả ra màn hình.
Ví dụ: Cho N= 6, dãy A gồm các số 12, 9, 20, 15, 9, 20, 5 vậy kết quả xếp hạng là:
Kết quả: |
Dãy số: |
12 9 20 15 9 20 5 |
|
Xếp hạng: |
3 4 1 2 4 1 5 |
Câu 6: Ngôn ngữ lập trình gồm những yếu tố nào
A. Tập hợp các ký tự B. Các quy tắc
C. Cả A và B đều đúng D. Ý tưởng – Giải thuật.
Câu 7: Phép toán 17 mod 4 = ?
A. 1 B. 4 C. 4.45 D. 12
Câu 8: Câu lệnh Writeln(‘2+3’); có công dụng gì?
A. In ra màn hình số 5 B. In ra màn hình 2+3 C. In ra màn hình 2+3=5 D. Tất cả đều sai
Câu 9: Trong chương trình pascal, ..........................
A. Phần khai báo đặt trước phần thân B. Phần thân bỏ cũng được
C. A, B đúng D. A, B sai
Câu 10:Trong Pascal khai báo nào sau đây là đúng?
A. var tb: real; B. 4hs: integer; C. Const x: real; D. Var r =30;
1.
For I = 2 to 12 Do write ('O'), câu lệnh in ra bao nhiêu chữ O?
2.
For I = 1 to 20 Do If (...) Then write (I,'');
chỗ trống cần điền để liệt kê ra các SỐ LẺ từ 1 đến 20 là?
3.
để tính tổng 1 + 2 + ... + 100 ta thực hiện For I = 1 to 100 Do S:=......
... cần điền?
4.
S;=0; For I:=4 to 12 Do If (I mod 12=1) Then S:=S +I;
giá trị của S?
5.
S;=0; For I:=1 to 5 Do S:=S +I;
giá trị của S?
6.
For I = 1 to 10 Do If (I mod 3 = 0) Then write (I,'');
kết quả?
7.
a:= 354 If (a mod 3 = 0) them write (a mod 3) Else Write (a Div 3);
kết quả?
8.
để in ra màn hình 20 chữ C cần thực hiện?
Lý thuyết:
1) If X > Y then Y:= Y+10 else Y:=X+10; Với X=5; Y=9.Kết quả Y = bao nhiêu:
A. 15 B. 9 C. 19 D. 5
2) If X>Y then Writeln(Y) else writeln(X); Với X=5, Y=9. Kết quả của câu lệnh trên:
A. Y B. 5 C. X D. 9
3) Để thể hiện điều kiện là NĂM thì biến YEAR nên khai báo kiểu dữ liệu nào ?
A. Var YEAR: Integer;
B. Var YEAR: Chars;
C. Var YEAR: String;
D. Var YEAR: Real;
4) IF a > 8 THEN b:= 3 ELSE b:= 5; Khi a nhập giá trị là 0 thì b nhận giá trị nào?
A. 3 B. 5 C. O D. 8
5) Để thể hiện A khác Viet Nam câu nào sau đây đúng
A. A != 'Viet Nam' B. A <> "Viet Nam" C. A <> "Viet Nam" D. A # "Viet Nam"
kết quả của phép toán 45 div 6 + 1 là bao nhiêu?
A. 7;
B. 8;
C. 3;
D. 4.
1. viết ví dụ các lệnh
lệnh in(thông tin, biểu thức toán học và kết quả, giá trị của biến)
lệnh nhập( giá trị của biến từ bàn phím)
lệnh gán ( giá trị cho biến)
2. viết lệnh
a. xuất ra màn hình câu " Truong THCS Kim Dong"
b. xuất ra màn hình biểu thức (45*5)/15 và kết quả của nó
c. nhập giá trị của biến x, y từ bàn phím, in giá trị của biến z biết giá trị biểu thức z:=x+y/x-y
3. hãy mô tả thuật toán hoán đổi giá trị 2 biến x,y
4. nêu hoạt động của máy tính khi gặp câu lệnh điều kiện dạng đủ và dạng thiếu ntn?( theo sơ đồ)
5. viết chương trình nhập 2 số nguyên a và b nhập từ bàn phím. thông báo kết quả so sánh ra màn hình
6. viết chương trình nhập 2 số nguyên a và b khác nhau từ bàn phím và in 2 số đó ra màn hình theo thứ tự không giảm
7. mỗi câu lệnh sau đây giá trị biến x là bao nhiêu? nếu trước đó giá trị của X bằng 3
a. if (32 mod 8=0) then X:X+1
b. if x>7 then X:=X+1