0
0
Hãy luôn nhớ cảm ơn và vote 5*
nếu câu trả lời hữu ích nhé!
5289
3329
Test ví dụ
5
2 10 5 6 1
(0 1 2 3 4) (Vị trí)
⇒ Xuất 1, vì
array[1] = array[0] . arra[2] = 2. 5 = 10
⇒ Pascal, cần C++ hay Python nói nhé !
uses crt ;
var a : array[0..100000] of longint ;
n, i : longint ;
// a[x] ; b[y] ; c[z];
// b[y] là phần tử cần kiểm tra
// Nếu a[x] . c[z] thì trả về y
function Check(a,b,c,y:longint) : longint;
begin
if a * c = b then Check := y
else Check := -1 ;
end ;
begin
clrscr;
readln(n);
for i := 0 to n-1 do read(a[i]);
for i := 0 to n - 2 do
if Check(a[i-1],a[i],a[i+1],i) <> 0 then write(i);
end .
Hãy giúp mọi người biết câu trả lời này thế nào?
Bảng tin