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 : ax 2 + 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; . 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. 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. > 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