Dãy số U_n được gọi là dãy số cách đều khi : U_n+1 - U_n = d    (Hằng số - Không phụ thuộc vào n) Nếu d.> 0 thì dãy số gọi là dãy số tăng, nếu d< 0 thì dãy số là dãy giảm.

Dãy số mà U_n = n² + n  với \(\forall n\in N,n\ge1\).Ta xét hiệu U_n+1 - U_n = (n +1)² + (n + 1) - (n² + n)  = 2n + 2  Không phải là hằng số (Vì hiệu này còn chứa n) Vậy dãy số đã cho không phải là dãy số cách đều. 

Có cần bạn bình luận ko vậy

Chị ơi em mới học lớp 7 nha chị       

e moi lop 7 a

Uses Crt;
Var A : array [1..1000] of longint;
n, m, d, t, i, S, k : longint;
Begin
//Phan A
        Clrscr;
Writeln(' Phan A ');
                Write(' Ban hay nhap 1 so n bat ky: ');
                Readln(n);
                Write(' Cac so chia het cho ba tu 1 den ',n,' la: ');
                        For i:=1 to n do
                                If (i mod 3) = 0 then Write(' ',i);
//Phan B
Writeln;
Writeln(' Phan B ');
                Write(' Ban hay nhap 1 so m bat ky: ');
                Readln(m);
                        For i:=1 to m do
                                Begin
                                        Write(' Ban hay nhap hang tu thu ',i,': ');
                                        Readln(A[i]);
                                        S:= S+A[i];
                                End;
                Write(' Tong cua day so tren la: ',S);
//Phan C
Writeln;
Writeln(' Phan C ');
                Write(' Ban hay nhap 1 so d bat ky: ');
                Readln(d);
                Write(' Ban hay nhap so K: ');
                Readln(k);
                        For i:=1 to n do
                                Begin
                                        Write(' Ban hay nhap hang tu thu ',i,': ');
                                        Readln(A[i]);
                                        If ((A[i] div k)=1)then t:=t+1;
                                End;
                Write(' Co tat ca ',t,' so giong ',k);
Readln;
End.