∫ x + 1 . s i n x d x bằng:
A. (x + 1)cosx + sinx + C B. -(x + 1)cosx + sinx + C
C. -(x + 1)sinx + cosx + C D. (x + 1)cosx - sinx + C
Tìm và sửa lỗi cho chương trình sau:
Bài 1:
Program bai 1;
Var x; n: integer;
Begin
X=12
Write(n:4,x:4);
ReadIn
End.
Bài 2:
Program 2bai;
Var i, n, s:real;
Begin
S:=0
For i:=0.5 to n do
S=S+i;
Write(s);
ReadIn
End.
Bài 1
Lỗi:
1) Program bai 1; => sửa: Program bai1;
2) Var x; n: integer; => sửa: Var x, n:integer;
3) X = 12 => sửa: x:=12;
-------------------
Bài 2
Lỗi
1) Program 2bai; => sửa: Program bai2;
2) Var i, n, s:integer;
3) S:=0 => sửa S:=0;
4) For i:=0,5 to n do => sửa: For i:=1 to 5 do
5) S=S+i; => sửa: S:=S+i;
Bài 1 : Cho S và i là biến nguyên. Khi chạy chương trình :
S:=0;
for i:=1 to 5 do S :=S +i;
writeln(S);
Kết quả in ra màn hình S là bao nhiêu ?
Bài 2: Tìm giá trị của S trong đoạn chương trình dưới đây:
S:=2;
For i:=1 to 5 do S:=S + i;
Bài 3: Hãy chỉ ra lỗi trong các câu lệnh sau đây:
1)X:=10; while X:=10 to X: X+5;
2) X:=10; while X = 10 do X=X+5
3) S:=0; n:=0; while S <= 10 do n:n+1 , S:= S+n;
( Giair chi tiết giúp mình với )
Bài 1: S=15
Bài 2: S=17
Bài 3:
1)X:=10; while X:=10 to X:(thiếu dấu '=') X+5;
2) X:=10; while X = 10 do X(thiếu dấu ';') =X+5 (thiếu dấu ';')
3) S:=0; n:=0; while S <= 10 do (thiếu 'begin') n:(thiếu dấu '=')n+1 ,(để kết thúc đoạn lệnh dùng dấu ';' không phải dấu ',') S:= S+n; (thiếu end;)
1. Tìm x sao cho :(x-7).(x-3) < 0
Cho S = 1 - 3 + 3^2 - 3^3 + .......+3^98 - 3^99
a) Chứng minh rằng S là bội của -20
b) Tính S , từ đó suy ra 3^100 chia cho 4 dư 1
2.Tìm số nguyên dương n sao cho n + 2 là ước của 111 còn n - 2 là bội của 11
3.Tìm n thuộc Z sao cho n - 1 là bội của n +5 và n + 5 là bội của n -1
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
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
Cho a, b,c là ba số nguyên dương và ba số x, y, z thỏa mãn x+y+z=1008. Đặt
S1= a phần b nhân x + c phần a nhân x; S2= a phần b nhân x + c phần b nhân y; S3= a phần c nhân z + b phần c nhân y. Chứng minh rằng: S1+S2+S3 ≧2016.
Đề sai rồi! Sửa đề: Cho \(S_1=\dfrac{b}{a}x+\dfrac{c}{a}z...\)
Giải:
Ta có:
\(S_1+S_2+S_3=\left(\dfrac{b}{a}x+\dfrac{c}{a}z\right)+\left(\dfrac{a}{b}x+\dfrac{c}{b}y\right)\)\(+\left(\dfrac{a}{c}z+\dfrac{b}{c}y\right)\)
\(=\left(\dfrac{b}{a}x+\dfrac{a}{b}x\right)+\left(\dfrac{c}{b}y+\dfrac{b}{c}y\right)+\left(\dfrac{c}{a}z+\dfrac{a}{c}z\right)\)
\(=\left(\dfrac{b}{a}+\dfrac{a}{b}\right)x+\left(\dfrac{c}{b}+\dfrac{b}{c}\right)y+\left(\dfrac{c}{a}+\dfrac{a}{c}\right)z\)
Dễ thấy: \(\left\{{}\begin{matrix}\dfrac{b}{a}+\dfrac{a}{b}\ge2\\\dfrac{c}{b}+\dfrac{b}{c}\ge2\\\dfrac{c}{a}+\dfrac{a}{c}\ge2\end{matrix}\right.\)
\(\Rightarrow S_1+S_2+S_3\ge2x+2y+2z\)
\(=2\left(x+y+z\right)=2.1008=2016\)
Vậy \(S_1+S_2+S_3\ge2016\) (Đpcm)
Tìm số nguyên x
1) -3 .| x -1 | = -27
\(-3\left|x-1\right|=-27\Leftrightarrow\left|x-1\right|=9\Leftrightarrow\left[{}\begin{matrix}x-1=9\\x-1=-9\end{matrix}\right.\Leftrightarrow\left[{}\begin{matrix}x=10\\x=-8\end{matrix}\right.\)
2 . a, A ={ x c N I 12 < x < 16 }
b.B = { x c N I x < 5 }
c. C = { x c N I 13 _<_ x _<_ 15 }
A = { 13 ; 14 ; 15 }
B = { 0 ; 1 ; 2 ; 3 ; 4 }
C = { 13 ; 14 ; 15 }
2 . a, A ={ x c N I 12 < x < 16 }
A = { 13; 14; 15 }
b.B = { x c N I x < 5 }
B = { 0; 1; 2; 3; 4 }
c. C = { x c N I 13 _<_ x _<_ 15 }
C = { 13; 14; 15}
1)Cho pi thuộc P ; i chạy từ 1 đến n. pi là các số nguyên tố khác nhau CM :( 1-1/(p1^2) ) ( 1-1/(p2^2) ) ( 1-1/(p3^2) )… ( 1-1/(pn^2) )>1/2
2)Cho Sn = 1+1/2+1/3+…+1/n.CMR:
a) 1/(S1^2)+ 1/(2 x (S2^2))+ 1/(3 x (S3^2))+…1/(n x (Sn^2))<2
b)Sm+Sn-Sm.n 1
Em hãy xác định các câu lệnh sau đây đúng hay sai? Nếu sai hãy giải thích tại sao?
a) For i:=150 to 1 do writeln(‘A’);
b) For i:=1.5 to 30.5 do writeln(‘B’);
c) S:=0;n:=0; While S<=20 do begin n:=n+1;S:=S+n; end
d) Var X: array[10..1] of integer;
e) Var X: array[1,5...20,5] of integer;
f) Var X: array[1..30] of integer;
a: Sai bởi chỉ số đầu lớn hơn chỉ số cuối
b: Sai vì chỉ số đầu, chỉ số cuối là số thực
c: Sai vì chỗ end thiếu chấm phẩy
d: Sai vì chỉ số đầu lớn hơn chỉ số cuối
e: Sai vì chỉ số đầu và chỉ số cuối là số thực
d: Đúng