Hãy nhập câu hỏi của bạn vào đây, nếu là tài khoản VIP, bạn sẽ được ưu tiên trả lời.
1.
Program Tim_Max;
Var A:Array[1..255] of Integer;
i, n, Max: Integer;
Begin
Write('Nhap n: '); Readln(n);
For i := 1 to n do
Begin
Write('Nhap phan tu A[',i,'] = '); Readln(A[i]);
End;
Max := A[1];
For i := 2 to n do if A[i]>Max then Max := A[i];
Write('Phan tu lon nhat la :',Max);
Readln
End.
2.
Uses Crt;
Type Mang = ARRAY[1..50] Of Integer;
Var A:Mang;
N,i,j,Tam:Integer;
Begin
{Nhập mảng}
Write('Nhap N='); Readln(N);
For i:=1 To N Do
Begin
Write('A[',i,']='); Readln(A[i]);
End;
{Sắp xếp}
For i:=1 To N-1 Do
For j:=i+1 To N Do
If A[i]>A[j] Then
Begin
Tam:=A[i]; A[i]:=A[j]; A[j]:=Tam;
End;
{In kết quả ra màn hình}
Writeln('Ket qua sau khi sap xep:');
For i:=1 To N Do Write(A[i]:5);
Readln;
End.
3.
Uses Crt;
Type Mang = ARRAY[1..50] Of Integer;
Var A:Mang;
N,i,x:Integer;
Function TimKiem(x, N: Integer; A:Mang):Integer;
Var i:Integer;
Begin
I:=1;
While (I <= N) and (X<>A[I]) do I:=I+1; {{{{tại sao lại phải làm như bước này, tại sao lại lấy i đi so sánh với N}}}}
If I <= N Then Timkiem:=I Else Timkiem:=0;
End;
Begin
{Nhập mảng}
Write(‘Nhap N=’); Readln(N);
For i:=1 To N Do
Begin
Write(‘A[‘,i,’]=’); Readln(A[i]);
End;
Write(‘Nhap X=’); Readln(x);
{Kết quả tìm kiếm}
If TimKiem(X,N,A)<>0 Then
Writeln(‘Vi tri cua X trong mang la:’, TimKiem(X,N,A))
Else Writeln(‘X khong co trong mang.’);
Readln;
End.
câu 1 tham khảo cái này nhé
Uses Crt;
Type Mang = ARRAY[1..50] Of Integer;
Var A:Mang;
N,i,Max:Integer;
Begin
Write('Nhap N='); Readln(N);
For i:=1 To N Do
Begin
Write('A[',i,']='); Readln(A[i]);
End;
Max:=A[1];
For i:=2 To N Do
If Max<A[i] Then Max:=A[i];
Writeln('Phan tu lon nhat cua mang:', Max);
Readln;
End.
1. ( 2x + y )( 4x2 - 2xy + y2 ) - 8x3 - y3 - 16
= [ ( 2x )3 + y3 ] - 8x3 - y3 - 16
= 8x3 + y3 - 8x3 - y3 - 16
= -16 ( đpcm )
2. ( 3x + 2y )2 + ( 3x + 2y )2 - 18x2 - 8y2 + 3
= 2( 3x + 2y )2 - 18x2 - 8y2 + 3
= 2( 9x2 + 12xy + 4y2 ) - 18x2 - 8y2 + 3
= 18x2 + 24xy + 8y2 - 18x2 - 8y2 + 3
= 24xy + 3 ( có phụ thuộc vào biến )
3. ( -x - 3 )3 + ( x + 9 )( x2 + 27 ) + 19
= -x3 - 9x2 - 27x - 27 + x3 + 9x2 + 27x + 243 + 19
= -27 + 243 + 19 = 235 ( đpcm )
4. ( x - 2 )3 - x( x + 1 )( x - 1 ) + 13( x - 4 )
= x3 - 6x2 + 12x - 8 - x( x2 - 1 ) + 13x - 52
= x3 - 6x2 + 12x - 8 - x3 + x + 13x - 52
= -6x2 + 26x - 60 ( có phụ thuộc vào biến )
C = y( x^4-y^4)-x^4y+y^5
=x^4y-y^5-x^4y+y^5
=0
Vậy...........................................
b) 5(3xn + 1 - yn - 1) + 3(xn + 1 + 5yn - 1) - 5(3xn + 1 + 2yn - 1) - (3n + 1 - 10)
= 15xn + 1 - 5yn - 1 + 3xn + 1 + 15yn - 1 - 15xn + 1 - 10yn - 1 - 3n + 1 - 10
= (15xn + 1 + 3xn + 1 - 15xn + 1 - 3n + 1) + (15yn - 1 - 5yn - 1 - 10yn - 1) - 10
= xn + 1(15 + 3 - 15 - 3) + yn - 1(15 - 5 - 10) - 10
= 0 - 0 - 10 = -10 (đpcm)
a) h(x) = (x + 1)(x2 - x + 1) - (x - 1)(x2 + x + 1)
= x3 - x2 + x + x2 - x + 1 - x3 - x2 - x + x2 + x + 1
= (x3 - x3) - (x2 - x2 + x2 - x2) + (x - x - x + x) + (1 + 1)
= 1 + 1
= 2 (đpcm)
a) h(x) = ( x + 1 )( x2 - x + 1 ) - ( x - 1 )( x2 + x + 1 )
= ( x3 + 13 ) - ( x3 - 13 )
= x3 + 1 - x3 + 1
= 2
Vậy h(x) không phụ thuộc vào biến ( đpcm )
b) 5( 3xn+1 - yn-1 ) + 3( xn+1 + 5yn-1 ) - 5( 3xn+1 + 2yn-1 ) - ( 3xn+1 - 10 )
= 15xn+1 - 5yn-1 + 3xn+1 + 15yn-1 - 15xn+1 - 10yn-1 - 3xn+1 + 10
= ( 15xn+1 + 3xn+1 - 15xn+1 - 3xn+1 ) + ( -5yn-1 + 15yn-1 - 10yn-1 ) + 10
= 0 + 0 + 10 = 10
Vậy giá trị của biểu thức không phụ thuộc vào biến ( đpcm )
Câu 2:
a) \(ĐKXĐ:x\ne1\)
\(A=\left(\frac{1}{x-1}-\frac{2x}{x^3+x-x^2-1}\right)\div\left(1-\frac{2x}{x^2+1}\right)\)
\(\Leftrightarrow A=\left(\frac{1}{x-1}-\frac{2x}{\left(x-1\right)\left(x^2+1\right)}\right)\div\frac{x^2-2x+1}{x^2+1}\)
\(\Leftrightarrow A=\frac{x^2+1-2x}{\left(x-1\right)\left(x^2+1\right)}\div\frac{\left(x-1\right)^2}{x^2+1}\)
\(\Leftrightarrow A=\frac{\left(x-1\right)^2\left(x^2+1\right)}{\left(x-1\right)\left(x^2+1\right)\left(x-1\right)^2}\)
\(\Leftrightarrow A=\frac{1}{x-1}\)
b) Để A > 0
\(\Leftrightarrow x-1>0\)(Vì\(1>0\))
\(\Leftrightarrow x>1\)
bts là buôn trà sữa