trong các dãy số -2; -1/2; 1;2 thì số không là tập nghiệm của đa thức P(x)=x^3-x^2-4x+4 là:
A -2 B-1/2 C 1 D 2
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.
uses crt;
var d,n,k,kt1,i,j,x,kt2,u,kt:longint;
st1,st2,st:string;
y:integer;
begin
clrscr;
write('nhap so k='); readln(k);
if k>1 then begin
d:=1;
n:=3;
repeat
repeat
kt:=0;
n:=n+2;
for i:=2 to trunc(sqrt(n)) do
if n mod i=0 then kt:=1;
if kt=0 then str(n,st1);
until kt=0;
{----------------------------------------}
repeat
kt:=0;
n:=n+2;
for j:=2 to trunc(sqrt(n)) do
if n mod j=0 then kt:=1;
if kt=0 then str(n,st2);
until kt=0;
{----------------------------------------}
kt:=0;
st:=st1+st2;
val(st,x,y);
for i:=2 to trunc(sqrt(x)) do
if x mod i=0 then kt:=1;
if kt=0 then d:=d+1;
until d=k;
end;
if k=1 then write('so nguyen to ghep thu ',k,' la 23')
else writeln('so nguyen to ghep thu ',k,' la: ',x);
readln;
end.
uses crt;
var a:array[1..1000]of integer;
i,n,k,t:integer;
begin
clrscr;
write('Nhap n='); readln(n);
for i:=1 to n do
begin
write('A[',i,']='); readln(a[i]);
end;
write('Nhap k='); readln(k);
t:=0;
for i:=1 to n do
if a[i] mod k=0 then t:=t+a[i];
writeln('Tong cac so la boi cua ',k,' la: ',t);
readln;
end.
a) dãy số: 3 là dãy số tăng bội 3
b) dãy số: 3, 5 Không phải là dãy số tăng bội 3
b) dãy số: 3, 5, 10 là dãy số tăng bội 3
d) dãy số: 12, 9, 6, 3 Không phải là dãy số tăng bội 3
e) dãy số: 3, 6, 9, 12, 15, 18, 21, 24, 27, 30, 33, 36, 39, 42, 45, 48, 51, 54, 57, 60 là dãy số tăng bội 3
Câu 2:
uses crt;
var a:array[1..100]of integer;
i,n,tb:integer;
begin
clrscr;
write('Nhap n='); readln(n);
for i:=1 to n do
begin
write('A[',i,']='); readln(a[i]);
end;
tb:=0;
for i:=1 to n do
tb:=tb+a[i];
writeln(tb/n:4:2);
readln;
end.
Program HOC24;
var i,n: integer;
a: array[1..1000] of integer;
t: longint;
f1,f2: text;
const fi='DATA1.TXT';
fo='KQ1.TXT';
begin
assign(f1,fi);
assign(f2,fo);
reset(f1);
rewrite(f2);
readln(f1,n);
for i:=1 to n do read(f1,a[i]);
t:=0;
for i:=1 to n do if a[i] mod 2=0 then t:=t+a[i];
writeln(f2,t);
for i:=1 to n do if a[i] mod 5=0 then write(f2,a[i],' ');
close(f1); close(f2);
end.
\(P\left(x\right)=x^3-x^2-4x+4=0\\ \Leftrightarrow x^2\left(x-1\right)-4\left(x-1\right)=0\\ \Leftrightarrow\left(x^2-4\right).\left(x-1\right)=0\\ \Leftrightarrow\left(x-2\right).\left(x+2\right).\left(x-1\right)=0\\ \Leftrightarrow\left[{}\begin{matrix}x-2=0\\x+2=0\\x-1=0\end{matrix}\right.\Leftrightarrow\left[{}\begin{matrix}x=2\\x=-2\\x=1\end{matrix}\right.\)
Chọn B