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.

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:

uses crt;

var p,i:integer;

begin

clrscr;

p:=1;i:=1;while i<=5 do

begin

p:=p*i;i:=i+1;

end;

write(p);

readln;

end. 

bai 2:

uses crt;var p,i:integer;begin    clrscr;    p:=1; i:=0;    while i <=10 do    begin

i:=i+1;        if (i mod 2<>0) then p:=p*i;    end;    write(p);    readln;end. bai 3:

uses crt;var n,i,p:integer;begin     clrscr;     write('nhap n: ');     readln(n);     i:=1;     p:=1;     while i<=n do     begin       if i mod 2=0 then p:=p*i;       i:=i+1;     end;     write(p);     readln;end.     

*Cách khác: Dùng for

Câu 1: 

uses crt;

var p,i:longint;

begin

p:=1;

for i:=1 to 4 do 

  p:=p*i;

writeln(p);

readln;

end.

Câu 2: 

uses crt;

var i,s:longint;

begin

clrscr;

s:=1;

for i:=1 to 10 do

  if i mod 2=1 then s:=s*i;

writeln(s);

readln;

end.

Câu 3: 

uses crt;

var n,i,s:longint;

begin

clrscr;

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

s:=0;

for i:=1 to n do 

  if i mod 2=0 then s:=s+i;

writeln(s);

readln;

end.

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

số các số tự nhiên lẻ có 3 chữ số là: (999-101):2+1=450(số)

tổng các số tự nhiên lẻ có 3 chữ số là: (999+101) x 450:2= 247500

Ta có các số lẻ cách nhau 2 đơn vị

=> Số số hạng các số lẻ từ 1 đến 999 là:

   ( 999 - 1 ) : 2+ 1 = 500 ( số )

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

   ( 999 + 1 ) . 500 : 2 = 250000 

       Đ/S:.......................

1; 2 ; 3 ; 4 ; 5 ; ................... ; 999

Số số hạng của các số từ 1 đến 999 là:

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

Tổng của các số từ 1 đến 999 là:

( 999 + 1 ) . 999 : 2 = 499 500

Đ/S :....................

mik lm xong rồi đó c nhớ ủng hộ mik nghen

thanks nguyen phuong linh nha

các số lẻ từ 1 đến 99 là 1;3;5;...;99

Số các số hạng của dãy : ( 99 - 1 ) : 2 + 1 = 50

Tổng 1 cặp là:

1+99=100

=> 1+3+5+...+99=50*100:2=2500

hehfureg

               ffffff

Tổng các số tự nhiên lẻ từ 1 đến 999 có dạng:

1 + 3 + 5 + 7 +.... + 999

Khoảng cách giữa 2 số liền nhau làL

3 - 1 = 2

Tổng trên có số số hạng là:

(999 - 1) : 2 + 1 = 500 (số)

=> Vậy tổng các số tự nhiên lẻ từ 1 đến 999 là:

\(\frac{\left(999+1\right).500}{2}=250000\)

KL:....

25000

Theo đề bài, ta cần phải tính: 1+3+5+...+999
Số số hạng của dãy là (999-1) : 2 +1 = 500 số 

Như vậy có 500 số lẻ từ 1 đến 999 
Bây giờ tính tổng:

(999+1)x500:2=250 000 

Vậy: TỔNG CÁC SỐ TỰ NHIÊN LẺ TỪ 1 ĐẾN 999 LÀ: 250 000