Bài 1 :

Số chẵn có 4 chữ số khác nhau đc lập từ 2 ; 3 ; 5 ; 9 :

9632 ; 9352 ; 5932 ; 5392 ; 3952 ; 3592

Tổng là : 9632 + 9352 + 5932 + 5392 + 3952 + 3592 = 37852

Bài 2 :

Tương tự

Bài 3 :

Tương tự

Bài 4 :

Câu hỏi của minh mini - Toán lớp 4 - Học toán với OnlineMath

Link : https://olm.vn/hoi-dap/detail/184832485431.html

Bài 1: Tính tổng các số chẵn có 4 chữ số khác nhau từ các chữ số : 2 ; 3 ; 5 ; 9

3592 + 3952 +  5392 + 5932 + 9532 + 9352 = 37822 

Bài 2 : Cho các chữ số : 1 ; 3 ; 5 ; 7 ; 9

Tính tổng các số có 4 chữ số khác nhau từ các chữ số trên ?

1357 + 1375 + 1359 + 1395 

trong dãy số có 402 chữ số 5 còn lai tớ ko biết

co 180 so co 3 chu so chia het cho 5

200 số có 3 chữ số chia hết cho 5

Dãy a) với b) không có quy luật

c) 3 + 6 + 9 + ... + 147

Khoảng cách là : 3

Số số hạng là:

     ( 147 - 3 ) / 3 + 1 = 49 ( số hạng )

Tổng trên là:
     ( 147 + 3 ) * 49 / 2 = 3675

                   Đ/s: c) 3675

a/số chia cho 5 dư 1 thì có tận cùng là 1 hoặc 6; vậy có số số chia cho 5 dư 1 là:

                             (996-101): 5 +1=180(số)                                                                số chia cho 5 dư 2 thì có tận cùng là 2 hoặc 7; vậy có số số chia cho 5 dư 2 là:

                             (997-102): 5+1=180(số)

b/Số số có 4 chữ số chia hết cho 3 là:

                             (9999-1002):3+1=3000(số)

c/Số số có 3 chữ số <500 mà chia hết cho 4 là:

                              (496-100):4+1=100(số)

số hạng thứ 1996 là: 1996x2=3992

Bạn viết thiếu đề bài rồi.

chào mừng các streamer

const fi='dl.dat'

fo='kq.dat'

var f1,f2:text;

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

i,n,dem1,dem2,t1,t2:integer;

begin

assign(f1,fi); reset(f1);

assign(f2,fo); rewrite(f2);

readln(f1,n);

for i:=1 to n do read(f1,a[i]);

dem1:=0;

dem2:=0;

for i:=1 to n do 

begin

if a[i] mod 2=0 then inc(dem1)

else inc(dem2);

end;

t1:=0;

t2:=0;

for i:=1 to n do 

begin

if (a[i] mod 6=0) then t1:=t1+a[i];

if (a[i] mod 9=0) and (a[i] mod 2<>0) then t2:=t2+a[i];

end;

writeln(f2,dem1,' ',dem2);

writeln(f2,t1);

writeln(f2,t2);

close(f1);

close(f2);

end.

const fi='dl.dat'

fo='kq.dat'

var f1,f2:text;

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

i,n,dem1,dem2,t1,t2:integer;

begin

assign(f1,fi); reset(f1);

assign(f2,fo); rewrite(f2);

readln(f1,n);

for i:=1 to n do read(f1,a[i]);

dem1:=0;

dem2:=0;

for i:=1 to n do 

begin

if a[i] mod 2=0 then inc(dem1)

else inc(dem2);

end;

t1:=0;

t2:=0;

for i:=1 to n do 

begin

if (a[i] mod 6=0) then t1:=t1+a[i];

if (a[i] mod 9=0) and (a[i] mod 2<>0) then t2:=t2+a[i]

end

writeln(f2,dem1,' ',dem2)

writeln(f2,t1)

writeln(f2,t2)

close(f1)

close(f2)

;-;

Bài 1 :24745500