a: 

#include <bits/stdc++.h>

using namespace std;

long long n,i,x;

int main()

{

cin>>n;

int t=0;

for (i=1; i<=n; i++)

{

cin>>x;

t=t+x;

}

cout<<t;

return 0;

}

program DemSoChan;

var

     A: array of Integer;

     n, i: Integer; 

begin

     Write('Nhap so phan tu cua day A: ');

     Readln(n); 

     SetLength(A, n);

     for i:= 0 to n-1 do

     begin

          Write('A[', i, ']= ');

          Readln(A[i]);

     end;

     Writeln('Cac so chan trong day A la:');

     for i:= 0 to n-1 do

     begin

          if A[i] mod 2 = 0 then

               Write(A[i], ' ');

     end;

end.

Dãy A có số 1247 có chữ số tận cùng là 7 nên 1247 không chia hết cho 2.

Dãy B  gồm các số chữ số tận cùng là 0;2;4;6;8 nên chia hết cho 2.

Dãy C gồm các số chữ số tận cùng là 1;3;5;7;9 nên không chia hết cho 2.

Dãy D có số 6035 có chữ số tận cùng là 5 nên 6035 không chia hết cho 2.

Vậy dãy gồm các số chia hết cho 2 là 36;148;8750;17952;3344.

Đáp án B

Var so,n,i:integer;

s:longint;

Begin

Write('n = ');readln(n);

For i:=1 to n do

Begin

Write('Nhap so thu ',i,' = ');readln(so);

If (so mod 3 = 0) and (so mod 5 = 0) then

s:=s+so;

End;

Write('Tong la ',s);

Readln;

End.

a) Công thức số hạng tổng quát \({u_n} = 5n,\;n \in {N^*}\).

b) Số hạng đầu \({u_1} = 5\), \({u_n} = {u_{n - 1}} + 5\)

Suy ra hệ thức truy hồi: \(\left\{ \begin{array}{l}{u_1}\; = 5\\{u_n} = {u_{n - 1}} + 5\end{array} \right.\)

Program HOC24;

var i,n: integer;

a: array[1..10000] of integer;

t: longint;

begin

write('Nhap N: '); readln(n);

for i:=1 to n do 

begin

write('A[',i,']='); readln(a[i]);

end;

t:=0;

for i:=1 to n do if (a[i] mod 3=0) and (a[i] mod 5=0) then t:=t+a[i];

write('Tong 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