uses crt;

var i,n,t:integer;

begin

clrscr;

readln(n);

t:=0;

for i:=1 to n do if i mod 2=1 then t:=t+i;

writeln(t);

readln;

end.

các số hạng từ 1-100 là :                                                     các số hang lẻ từ 101-199 là:

                                                                                                (199-101) : 2+1=50

   ( 100-1) : 1 +1 =100                                                          tổng các số lẻ liên tiếp là :

tổng các số  tự nhiên là :                                                            [ (199+101) .50 ] :2=7500

[ (100 +1) .100] :2 =5050                                                     cho mik nha đúng 100% nha

a) = (100-1) : 1+1= 100

    = (100+1) x 100 : 2= 5050

b) =(199-101): 2+1= 50

    = (199+101) x 50 : 2= 7500

THAnk yOu

Bài 1: 

uses crt;

var n,t1,t2,t3,i:integer;

begin

clrscr;

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

t1:=0;

t2:=0;

for i:=1 to n-1 do 

  begin

if i mod 2=1 then t1:=t1+i

else t2:=t2+i;

end;

writeln('Tong cac so le nho hon ',n,' la: ',t1);

writeln('Tong cac so chan nho hon ',n,' la: ',t2);

t3:=0;

for i:=1 to 2*n do 

  t3:=t3+i;

writeln('Tong cac so trong day so tu 1 toi 2*',n,' la: ',t3);

readln;

end.

1) Các số lẻ từ 1 đến 2015 là:

 ( 2015 -1) :1 + 1 = 2015 ( số)

Tổng các số lẻ từ 1 đến 2015 là:

 ( 2015 + 1) x 2015 : 2 = 2031120

2) Số số hạng các số tự nhiên từ 1 đến 2016 là:

( 2016 - 1) : 1+1 =  2016 ( số hạng)

Tổng các số tự nhiên từ 1 đến 2016 là:

( 2016 + 1) x 2016 : 2 = 2033136

1. Tổng: [(2015+1)x1008/2=5219 (theo công thức scuối + sđầu x ssốhạng /2)

2. Tổng: [(2016+1)x2016/2=2033136 nhas :D

1 . 108864

2 . 2033136

cho mk nhé

Câu 1:

Program HOC24;

var i,p: integer;

t: longint;

begin

write('Nhap P: '); readln(p);

t:=0;

for i:=1 to p do if i mod 2<>0 then t:=t+i;

write('Tong cac so le la: ',t);

readln

end.

Câu 2:

Program HOC24;

var i,n: integer;

t: longint;

begin

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

t:=0;

for i:=1 to n do if i mod 2=0 then t:=t+i;

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

readln

end.

Câu 3:

Program HOC24;

var i,t,n: integer;

begin

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

t:=0;

for i:=1 to n do if n mod i=0 then t:=t+i;

write('Tong cac uoc cua ',n,' la: ',t);

readln

end.

    từ 1    ->    9   có  9    số có 1 c/s
     "  10   ->   99  có 90    "   "  2 /s
     "  100 ->   999  "  900  "   "  3c/s
     "  1000->2007  "  1008 "   "  4c/s
=> "  1     -> 2007 "
                             9x1+90x2+900x3+1008x4=6921 (lượt số)

Ghi hộ mik phép tính đi

\(S=1+3+5+...+199\)

\(\Rightarrow S=\left[\left(199-1\right):2+1\right]\left(1+199\right):2\)

\(\Rightarrow S=100.200:2=10000\)

Số lẻ đầu tiên: 1

Số lẻ cuối cùng: 199

Số lượng số hạng:

\(\left(199-1\right):2+1=100\) (số hạng)

Tổng là:

\(\left(199+1\right)\cdot100:2=1000\) 

Đáp án đúng là: A

Các số tự nhiên lẻ lập thành một cấp số cộng với số hạng đầu u₁ = 1 và công sai d = 2.

Do đó tổng 100 số hạng đầu tiên của cấp số cộng này là:

\({S_{100}} = \frac{{100.\left( {1 + 1 + 99.2} \right)}}{2} = 10\,000\).