Bạn hỏi - Chuyên gia trả lời
Bạn cần hỏi gì?
Viết chương trình:
- Nhập mảng một chiều các số nguyên (không quá 100 phần tử).
- Đếm và tính tổng các số chẵn và là bội của 3. Thông báo kết quả ra màn hình.
Viết câu lệnh rẽ nhánh tính:
Cho giá trị a=31, b=16, c=8, d=5. Hãy xác định giá trị của biểu thức D:
D:= sqr(d) + b > c*d + a
(Tính cụ thể từng bước)
Cho biết kết quả sau khi thực hiện lệnh:
Begin
a := 100; b := 30; x := a div b; Write(x);
End.
A. 10
B. 33
C. 3
D. 1
Để biên dịch chương trình, trong Pascal ta nhấn tổ hợp phím:
A. Ctrl + F9
B. Alt + F9
C. Alt + F8
D. Shift + F9
Để nhập giá trị cho 2 biến a và b ta dùng lệnh:
A. Write(a,b);
B. Real(a.b);
C. Read(‘a,b’);
D. Readln(a,b);
Để đưa ra màn hình giá trị của biến a kiểu nguyên và biến b kiểu thực ta dùng lệnh:
A. Write(a:8:3, b:8);
B. Readln(a,b);
C. Writeln(a:8, b:8:3);
D. Writeln(a:8:3, b:8:3);
Biểu thức 3 div 7 có giá trị là:
A. 2
B. 1
C. 0
D. 7
Cho biết kết quả của biểu thức (2*((45 mod 3) +12)) div 5 là bao nhiêu?
B. 4
C. 6
D. 8
Phép toán nào đúng khi số nguyên A là số lẻ:
A. A mod 2 = 0
B. A div 2 = 1
C. A div 2 = 0
D. A mod 2 = 1
Trong pascal, biểu diễn sqr(x) có nghĩa là:
A. Bình phương của x
B. Căn bậc hai của x
C. Giá trị tuyệt đối của x
D. Luỹ thừa cơ số e của x
Biểu thức nào không phải là biểu thức trong Pascal?
A. (a+x)*(b+y)/2
B. ( m div 5 >=2 ) hoặc ( m <=2)
C. a*sqr(x) + b*x + c = 0
D. Not (a >10)
Xét biểu thức logic: (n mod 100 > 10) and (n div 100 < 10)
Với giá trị nào của n sau đây, biểu thức có giá trị đúng?
A. 121
B. 2001
C. 201
D. 1200
Trong ngôn ngữ lập trình Pascal, cho đoạn chương trình:
i:=1;
While i <5 do
if I mod 3 = 0 then Write(‘TIN HOC’);
i:=i+1;
End;
Chữ TIN HOC được in ra màn hình mấy lần
A. 3
B. 2
C. 1
D. 0
Cho biết kết quả của đoạn chương trình sau?
N:=5; Tong:=0;
For i:=1 to n do
If (i mod 2=0) then Tong:=Tong + i;
Write(Tong);
D. 2
Cho đoạn chương trình:
Kq:=1;
For i:=1 to 5 do
Kq:=Kq*i;
Kết quả sau khi chạy là :
A. 0
B. 120
C. 60
D. 20
Biểu thức ((35 mod 9) div 5) có kết quả là mấy?
A. 1
B. 3
C. 4
Biến X có thể nhận giá trị: 0.5; 1.5; 2.5; 3.5; 4.5 và biến Y có thể nhận các giá trị 0; 1; 3; 5; 7; 9. Khai báo biến nào sau đây là đúng?
A. Var X: Byte; Y: Real;
B. Var X: Real; Y: Byte;
C. Var X, Y: Integer;
D. Var X, Y: Byte;
Cho đoạn chương trình sau: x:= 10; y:= 30; writeln(‘x+y’); kết quả màn hình sẽ là gì?
A. 20
B. x+y
C. 10
D. 30
Biểu thức Pascal: (a+cos(x))/sqrt(sqr(a)+sqr(x)+1) khi chuyển sang toán học có dạng:
Xét biểu thức logic: (m mod 100 < 10) and (m div 100 > 0). Với giá trị nào của m dưới đây biểu thức trên cho giá trị false?
A. 208
B. 2009
C. 166509
D. 99
Biết rằng a, b, c là độ dài ba cạnh của một tam giác, biểu thức quan hệ nào sau đây cho kết quả true?
A. c + a > b;
B. a - b > c;
C. c – b ≥ a;
D. c - a > b.
Chương trình dịch Pascal sẽ cấp phát bao nhiêu byte bộ nhớ cho các biến trong khai báo sau:
Var M, N, I: INTEGER;
P, A, B: REAL;
X: EXTENDED;
K: WORD;
A. 44;
B. 36;
C. 38;
D. 42.
- Đếm và tính tổng các số lẻ và là bội của 5. Thông báo kết quả ra màn hình.
Cho giá trị a=31, b=16, c=8, d=5. Hãy xác định giá trị của biểu thức C:
C := a mod c + d >= sqrt(b) + c
a := 100; b := 30; x := a mod b ; Write(x);
Để chạy chương trình, trong Pascal ta nhấn tổ hợp phím:
A. Alt + F9
B. Ctrl + F9
C. Alt + F3
D. Alt + X
Để đưa ra màn hình giá trị của biến x kiểu nguyên và biến y kiểu thực ta dùng lệnh:
A. Write(x:8:3, y:8);
B. Readln(x, y);
C. Writeln(x:8, y:8:3);
D. Writeln(x:8:3, y:8:3);
Để nhập giá trị cho 2 biến x và y ta dùng lệnh:
A. Write(x, y);
B. Real(x. y);
C. Readln(x, y);
D. Read(‘x, y’);
Biểu thức 7 div 3 có giá trị là:
Phép toán nào đúng khi số nguyên A là số chẵn:
A. A div 2 = 1
B. A div 2 = 0
C. A mod 2 = 1
D. A mod 2 = 0
A. ( m div 5 >=2 ) or ( m <=2)
B. a*sqr(x) + b*x + c = 0
C. Not (a >10)
D. (a+x)(b+y)/2
Với giá trị nào của n sau đây, biểu thức có giá trị sai?
A. 110
B. 111
C. 112
D. 113
Cho biết kết quả của biểu thức (2*(45 mod 3) +12) div 5 là bao nhiêu?
if I mod 2 = 0 then Write(‘TIN HOC’);
Trong pascal, biểu diễn sqrt(x) có nghĩa là:
Kq:=0;
A.0
B.120
C.60
D.20
Biểu thức ((35 mod 9) div 4) có kết quả là mấy?
If (i mod 3=0) then Tong:=Tong + i;