Với số nguyên dương n , kí hiệu an = [-1]n . [n2+n+1]/n!
Tính a1+a2+a3+...+a2015
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.
![](https://rs.olm.vn/images/avt/0.png?1311)
![](https://rs.olm.vn/images/avt/0.png?1311)
Có:
a1+a2=a3+a4=...=a2015+a1=1
=>a1+a2+a3+a4+...+a2014+a2015=1007+a2015
Mà 1007+a2015=0
=>a2015=-1007.
=>a1=1--1007
a1=1008.
Chúc học tốt^^
Có:
a1+a2=a3+a4=...=a2015+a1=1
=>a1+a2+a3+a4+...+a2014+a2015=1007+a2015
Mà 1007+a2015=0
=>a2015=-1007.
=>a1=1--1007
a1=1008.
Chúc học tốt^^
![](https://rs.olm.vn/images/avt/0.png?1311)
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.
![](https://rs.olm.vn/images/avt/0.png?1311)
uses crt;
const fi='dulieu.inp';
var f1:text;
a:array[1..100]of integer;
n,i,t1,t2:integer;
begin
clrscr;
assign(f1,fi); reset(f1);
readln(f1,n);
for i:=1 to n do
read(f1,a[i]);
t1:=0;
t2:=0;
for i:=1 to n do
begin
if a[i]>0 then t1:=t1+a[i];
if a[i]<0 then t2:=t2+a[i];
end;
writeln('Tong cac so duong la: ',t1);
writeln('Tong cac so am la: ',t2);
close(f1);
readln;
end.