Chọn B

phần a

phần b

Từ 2;4;...;8 có số chữ số là:

(8-2):2+1=4 chữ số

Từ 10;12;...;98 có số chữ số là:

[(98-10):2+1]x2=90 chữ số

Từ 100;102;...;998 có số chữ số là:

[(998-100):2+1]x3=1350 chữ số

Từ 1000;1002;....;2468 có số chữ số là:

[(2468-1000):2+1]x4=2940 chữ số

Vậy dãy trên có số chữ số là:

2940+1350+90+4=4384 chữ số

co 1235so

Dãy trên là dãy cách đều 2 đơn vị 

Dãy có số chữ số là: 

(2468 - 2) : 2 + 1 = 1234 (số hạng)

Đáp số: 1234 số hạng 

tính từ số nhà đầu tiên là số 1 

Từ số 1 đến số 9 : có 9 chữ số

Từ số 10 đến số 99 : có (99 - 10) : 1 + 1 = 90 số => có 90 x 2 = 180 chữ số

Còn lại số chữ số là: 424 - 180 = 244 chữ số để đánh số nhà có 3 chữ số

244 : 3 = 243 (dư 1) => có 243 số nhà có 3 chữ số và dư 1 chữ số

Bạn xem lại đề: vì đánh số thứ tự các nhà nên không có trường hợp còn lẻ ra chữ số

sai đề vì đánh số thứ thự các nhà nên không có trường hợp lẻ ra chữ số

viet chu di

Các số có 1 chũ số: (9- 1) : 2 x 1 = 4(chữ số)

Các số có 2 chữ số: (90 : 2) x 2 = 90(chữ số)

Đã dùng số chữ số là: 424 - (90 + 4) = 330(chữ số)

Các số có 3 chữ số: 330 : 3 = 110(chữ số)

Số nhà cuối cùng là: (4 : 2) + (90 : 2) + (110 : 2) = 102

uses crt;

var a:array[1..2,1..5]of integer;

i,j,t:integer;

begin

clrscr;

for i:=1 to 2 do 

 for j:=1 to 5 do

begin

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

end;

t:=0;

for i:=1 to 2 do 

 for j:=1 to 5 do 

if a[i] mod 2=0 then t:=t+a[i];

writeln(t);

readln;

end.

Câu 1: 

uses crt;

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

i,n,t,s:integer;

begin

clrscr;

write('Nhap n='); readln(n);

for i:=1 to n do 

  begin

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

end;

t:=0;

s:=1;

dem:=0;

for i:=1 to n do 

  if a[i] mod 3=0 then 

begin

inc(dem);

t:=t+a[i];

s:=s*a[i];

end;

if dem=0 then writeln('Khong co so chia het cho 3 trong day')

else begin

writeln('Tong cac so chia het cho 3 la: ',t);

writeln('Tich cac so chia het cho 3 la: ',s);

end;

readln;

end.

Câu 2: 

uses crt;

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

i,n,dem,t:integer;

begin

clrscr;

write('Nhap n='); readln(n);

for i:=1 to n do 

  begin

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

end;

dem:=0;

t:=0;

for i:=1 to n do 

 if a[i] mod 2=0 then 

begin

inc(dem);

t:=t+a[i];

end;

writeln('So so chan la: ',dem);

writeln('Tong cac so chan la: ',t);

readln;

end.

Câu 3: 

uses crt;

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

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

begin

clrscr;

write('Nhap n='); readln(n);

for i:=1 to n do 

  begin

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

end;

dem1:=0;

dem2:=0;

t1:=0;

t2:=0;

s1:=1;

s2:=1;

for i:=1 to n do

begin

if a[i] mod 2=0 then 

begin

inc(dem1);

t1:=t1+a[i];

s1:=s1*a[i];

end

else begin

inc(dem2);

t2:=t2+a[i];

s2:=s2*a[i];

end;

end;

if dem1=0 then writeln('Khong co so chan trong day')

else begin

writeln('So so chan la: ',dem1);

writeln('Tong cac so chan la: ',t1);

writeln('Tich cac so chan la: ',s1);

end;

if dem2=0 then writeln('Khong co so le trong day')

else begin

writeln('So so le la: ',dem2);

writeln('Tong cac so le la: ',t2);

writeln('Tich cac so le la: ',s2);

end;

readln;

end.

Bài 1: 

#include <bits/stdc++.h>

using namespace std;

long long n,x,i,t1,t2;

int main()

{

cin>>n;

t1=0; t2=0;

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

{

cin>>x;

if (x%2==0) t1=t1+x;

else t2=t2+x;

}

cout<<t1<<" "<<t2;

return 0;

}

có 99: 3= 33 số hạng chẵn