CÂU HỎI TRẮC NGHIỆM (P1) potx

CÂU HỎI TRẮC NGHIỆM

Câu 1: Cho khai báo biến :

Var m, n : integer;

x, y : Real;

Lệnh nào sai :

a) m := -4;

b) n := 3.5;

c) x := 6;

d) y := +10.5;

Câu 2: Ðể tính gía trị , chọn cách viết nào :

a) x := -b/2a;

b) x := -b/2*a;

c) ;

d) x := -b/2/a;

Câu 3: Biểu thức : 25 div 3 + 5/2*3 có giá trị là :

a) 8.0;

b) 15.5;

c) 9.5;

d) 15.0;

Câu 4: Cho phương trình : ax2 + bx + c = 0

Giả sử a? 0 và Delta:= b*b- 4*a*c > 0 Một nghiệm của phương trình là :

a) X:= -b + SQRT(Delta) / (2*a);

b) X:= (-b + SQRT(Delta) ) /2*a;

c) X:= (-b + SQRT(Delta) ) / (2*a);

d) X:= (-b -SQR(Delta) ) /2/a;

Câu 5: Cho ch là biến có kiểu Char Lệnh nào đúng :

a) ch:="a"

b) ch:=65;

c) ch:=chr(65);

d) ch:='abcd';

Câu 6:Biến X được khai báo là kiểu integer Lệnh nào sai :

a) X:= round(275/3);

b) X:= 210 div 4;

c) X:= SQRT(49);

d) X:= ABS(-453);

Câu 7: Biểu thức nào sau đây có giá trị TRUE :

a) (100 > 76) and ('B' < 'A');

b) not (49.5 + 2 < 5) or (2 > 4 div 2); c) (49.5 + 2 < 5) and (2 < 4 div 2);

d) 2*(3+5) < 18 div 4*4;

Câu 8: Khi chạy chương trình :

Var St, St1 : String;

Begin

St := '123';

St1 := '456';

Write(St + St1);

End;

Kết quả in ra là :

a) '123456';

b) 123456;

c) 579;

d) Câu a), b), c) đều sai;

Câu 9: Sau phép gán : Ch := CHR( ORD('a')- 32 ); thì giá trị của Ch là :

a) 65;

b) A;

c) 'A';

d) 'a';

Câu 10: Khi chạy chương trình :

Var

a, b, c, N : integer;

Begin

N:=546;

a:=N div 100;

b:=(N Mod 100) div 10;

c:=(N Mod 100) Mod 10;

Write(a+b+c);

End

Kết quả in ra :

a) 546;

b) 5;

c) 15;

d) 6;