Cho : a1/a2 = a2/a3 = ....= a(n-1)/an = a(n)/a1 và a1 + a2 + .... +a(n) khác 0 ; a1 = -2
Tính a2 ; a3 ; a4 ; .... ; a(n) bằng bao nhiêu ?
K
Khách
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.
Những câu hỏi liên quan
8 tháng 3 2021
Bài 1:
uses crt;
var a:array[1..1000000]of longint;
i,n,x:longint;
begin
clrscr;
write('Nhap n='); readln(n);
for i:=1 to n do
begin
write('A[',i,']='); readln(a[i]);
end;
write('Nhap x='); readln(x);
for i:=1 to n do
if a[i]<>x then write(a[i]:4);
readln;
end.
