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.

5 tháng 11 2017

Dãy A gồm các số có chữ số tận cùng là 8;7;6;4;3 nên không chia hết cho 5.

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

Dãy C gồm các số có chữ số tận cùng là 0;5 nên chia hết cho 5.

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

Vậy dãy gồm các số chia hết cho 5 là 80;185;875;2020;37105.

Đáp án C

11 tháng 11 2021

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;

}

20 tháng 4 2023

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.

28 tháng 6 2019

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

13 tháng 3 2023

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.

HQ
Hà Quang Minh
Giáo viên
21 tháng 9 2023

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.\)

14 tháng 3 2023

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.

16 tháng 3 2023
A = int(input('N = ')) if (A >= 0and (A <= 10**3):     i = 0     tong = 0     print (i)     while (i <= 10**3):         i += 1         if (i%3==0and (i%5==0):             if (i <= A):                 tong += i                 print (i)     print (f'Tổng: {tong}')
17 tháng 10 2023

Program HOC24;

uses crt;

var i,n: integer;

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

t: longint;

begin

clrscr;

readln(n); 

t:=0;

for i:=1 to n do

begin

read(a[i]);

if (a[i] mod 2=0) and (a[i] mod 5=0) then t:=t+a[i];

end;

readln;

write(t);

readln;

end.