Cho ∫ 0 π 6 s i n n x c o s x d x = 1 64 . Tìm n?
A. 6
B. 5
C. 4
D. 3
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. 31. C
2. D
3. C
4. D
5. D
6. B
7. D
8. B
9. C
1 với x thuộc q khăn định nào dưới đay là sai
A /x/ = x 9 x>0 B /x/ = -x (x>0) C /x/ =o nếu x=0 D /x/ = x nếu x < 0
2 với x là số hữu tỉ khắc 0 tích x^6*x^2 =
A x^12 B x^8 C x^6 +x^2 D x^10 - x^2
\(\text{Chứng minh phương trình sau luôn có nghiệm: a c o s 2 x + b s i n x + c o s x = 0}\)
\(\text{Đặt f (x)= a.cos2x+b.sinx+cosx}\)
\(\text{Hàm f (x) xác định và liên tục trên R}\)
\(\text{f ( π /4 ) = b √2 /2 + √2 /2 }\)
\(\text{f ( 5/π4 ) = − b √ 2/ 2 − √ 2/ 2 }\)
\(\text{⇒ f (π /4) . f ( 5 π/ 4 ) = − 1/2 ( b + 1 )^ 2 ≤ 0 ; ∀ a ; b ; c}\)
\(⇒ f (x)= 0 luôn có ít nhất 1 nghiệm thuộc đoạn [ π /4 ; 5π/4]\)
Hay pt đã có nghiệm.
Các câu lệnh và khai báo sau trong pascal đúng hay sai?hãy chỉ ra lỗi sai nếu có
a) For i:=1 to 10; do x:=x+1;
b) For i: =1 to 10 do writeln('A')
c) Y:=5; while Y:=10 do Y:=Y+20;
d) s :=0; n :=0; ; while s<= 10 do n :=n+1;s:=s+n;
e) for i =100 to 20 do x :=x+2;
f) for i :=2 to 20 do x:=x+1;
a) 2 lỗi
- thiếu do
- vòng lặp for tuyệt đối không có ;
b: sau writeln('A') không có chấm phẩy
c: sai chỗ y:=10
phải là y=10 mới đúng
d: sử dụng 2 chấm phẩy là sai
sau while do nếu có từ 2 lệnh trở lên phải bao bọc trong begin end
e: thiếu dấu : sau i, đi từ 100 tới 20 là sai,
phải là for i:=100 downto 20 do mới đúng
f: không sai
Câu 6: Trong đoạn chương trình sau, có mấy câu lệnh được lặp lại?
S := 0; dem := 0; n := 10;
While dem > n do
Begin
dem := dem +1;
Write(‘ Nhap so X’,dem,’=’);Readln(X);
S := S + X ;
end;
A. 0 B. 1 C. 3 D. 4
ét o ét bà con cô chú ơi ét o ét, ét o ét é é é é é
Xét một vecto quay OM→ có những đặc điểm sau:
- Có độ lớn bằng hai đơn vị chiều dài.
- Quay quanh O với tốc độ góc 1 rad/s
- Tại thời điểm t = 0, vecto OM→ hợp với trục Ox một góc 30o
Hỏi vecto quay OM→ biểu diễn phương trình của dao động điều hòa nào?
A. x = 2cos(t – π/3) B. x = 2cos(t + π/6)
C. x = 2cos(t - 30o) D. x = 2cos(t + π/3)
Chọn đáp án B.
Vecto quay OM→ có:
+ Có độ lớn bằng hai đơn vị chiều dài nên biên độ dao động A = 2.
+ Quay quanh O với tốc độ góc 1 rad/s nên tần số ω = 1rad/s.
+ Tại thời điểm t = 0, vecto OM→ hợp với trục Ox một góc 30o nên pha ban đầu là φ = π/6 rad.
Phương trình dao động: x = 2.cos(t + π/6).
Bài 1:Gạch chân lỗi sai và sửa lại cho đúng trong các câu lệnh sau:
a) X:= 5; while X <= 5; do X:= X + 5;
b) X= 10; while X = 10 do X:= X + 5;
c) S:= 0; n:=0; while S <= 10 do S:=S + n ; n:=n+1;
a) X:= 5(;) while X <= 5(;) do X:= X + 5;
----> lỗi sai: Thừa 2 dấu ';' ở sau while và ở sau do (lỗi sai trong ngoặc)
----> sửa lại :X:= 5 while X <= 5 do X:= X + 5;
b) X= 10; while X = 10 do X:= X + 5;
----> lỗi sai : Sai lệnh gán X=10.
----> sửa lại : X:= 10; while X = 10 do X:= X + 5;
c) S:= 0; n:=0; while S <= 10 do S:=S + n ; n:=n+1;
Về cấu trúc không sai nhưng để như vậy sẽ thành vòng lặp vô hạn.
----> lỗi sai : thiếu begin ... end; ở sau câu lệnh lặp
----> sửa lại : S:= 0; n:=0; while S <= 10 do begin S:=S + n ; n:=n+1; end;
1. Cho khai báo: VAR Mang1d : ARRAY[-Nmax..Nmax] OF Integer; Khai báo trên ĐÚNG trong trường hợp nào?
a Nmax phải là kiểu số nguyên hoặc kiểu ký tự hoặc kiểu logic.
b Mọi trường hợp.
c Nmax là một hằng số nguyên đã được khai báo trước đó.
d Nmax là một biến nguyên đã được khai báo trước đó.
2. Cho mảng A gồm N số nguyên. Đoạn chương trình sau thực hiện công việc gì?
Dem:=0;
For i:=1 TO N DO
IF A[i]>=0 THEN dem:=dem+1;
Write(dem);
a Cho biết số lượng các số nguyên dương
b Cho biết số lượng các số nguyên không âm
c Tính tổng các số nguyên dương
d Kiểm tra phần tử thứ i là số âm hay dương
3. Đoạn chương trình sau thực hiện công việc gì?
St:= ‘’; {rỗng}
FOR i:=Length(S) DOWNTO 1 DO St:=S[i]+St;
a In xâu đảo của S ra màn hình c In xâu S ra màn hình
b Tạo xâu đảo của xâu S d Tạo xâu St giống hệt xâu S
4. Chọn khai báo Xâu mà không hợp lệ:
a Var S:string[200];
b Var S:string;
c Type Xau = string[300];
Var S: Xau;
d Type Xau = string[20];
Var S: Xau;
5. Cho S là biến xâu, câu lệnh sau
for i:=length(S) downto 1 do write(S[i]); thực hiện công việc:
a Đưa ra màn hình xâu S
b Đưa ra màn hình mỗi kí tự của xâu S trên một dòng
c Đưa ra màn hình xâu đảo ngược của S
d Đưa ra màn hình các chữ cái trong xâu từ chữ cái đầu tiên đến chữ cái cuối cùng
6. Cho S là biến xâu, câu lệnh sau
for i:=1 to length(S)-1 do S[i+1]:=S[i]; thực hiện công việc:
a Gán giá trị của kí tự cuối cùng cho các kí tự còn lại của xâu
b Dịch chuyển các kí tự của xâu lui một vị trí
c Dịch chuyển các kí tự của xâu lên một vị trí
d Gán giá trị của phần tử đầu tiên cho các phần tử còn lại của xâu S
7. Cho 2 xâu: S1= ‘Cuu hoc sinh Dong Khanh’; S2= ‘Dong Khanh’; Kết quả của hàm Pos (S1, S2) là:
a Pos (S1, S2) = 0. c Pos (S1, S2) = 11.
b Pos (S1, S2) = 7. d Pos (S1, S2) = 14.
8. Cho xâu s1 = 'pascal', xâu s2 có giá trị nào trong các giá trị sau để biểu thức s1< s2 nhận giá trị TRUE
a 'pascan' b 'Pascal' c 'PASCAL' d 'Pascan'
9. Cho s:= 'Hoa học trò' thì length(s) bằng bao nhiêu?
a 9 b 11 c 12 d 13
10. Cho chương trình sau:
Program BT;
var S : String;
i : byte; begin
write('Nhap xau S: ');
readln(S);
for i:= length(S) downto 1 do write(S[i]);
readln;
end.
Chương trình trên thực hiện công việc gì ?
a Nhập một xâu từ bàn phím và đưa ra màn hình xâu đó nhưng viết theo thứ tự ngược lại.
b Nhập một xâu từ bàn phím và đưa ra màn hình xâu đó nhưng viết theo thứ tự ngược lại và độ dài xâu đó.
c Nhập một xâu từ bàn phím và đưa ra màn hình độ dài xâu đó.
d Nhập một xâu từ bàn phím và đưa ra màn hình xâu đó.
Một sóng cơ truyền dọc theo trục Ox có phương trình là u = 0,05cos(6 π t - π x)(m ; s). Tốc độ truyền sóng này là
A. 30 m/s. B. 3 m/s. C. 6 m/s. D. 60 m/s.
1 . Cho các số hữu tỉ x, y, z : x=a/b ; y= c/d ; z= m/n . trong đó : m= a+c/2 ; n= b+d/2. biết x = y. hãy so sánh x với z;y ?
2 . cho các số hữu tỉ x, y, z : x=a/b ; y= c/d ; z= m/n . biết ad-bc=1; cn-dm = 1 ; b,d,n >0
a ) So sánh các số x,y,z
b ) Cho t = a+m /b+n (b+n khác 0 ). So sánh y với t
3. Cho 6 số nguyên dương a<b<c<d<m<n . Chứng minh rằng a+c+m /a+b+c+d+m+n