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.

13 tháng 8

\(\dfrac{1}{1\cdot2}+\dfrac{1}{2\cdot3}+...+\dfrac{1}{x\left(x+1\right)}\\ =1-\dfrac{1}{2}+\dfrac{1}{2}-\dfrac{1}{3}+...+\dfrac{1}{x}-\dfrac{1}{x+1}\\ =1+\left(\dfrac{1}{2}-\dfrac{1}{2}\right)+\left(\dfrac{1}{3}-\dfrac{1}{3}\right)+...+\left(\dfrac{1}{x}-\dfrac{1}{x}\right)-\dfrac{1}{x+1}\\ =1-\dfrac{1}{x+1}\\ =\dfrac{x+1}{x+1}-\dfrac{1}{x+1}\\ =\dfrac{x}{x+1}\)

20 tháng 3 2022

Câu 1: 
uses crt;
var s,i,n:integer;
begin clrscr;
s:=0;
write('Nhap n: ');readln(n);
for i:=1 to n do
if i mod 2 <> 0 then inc(s,i);
write('Tong cac so le tu 1 den ',n,' la: ',s);
readln
end.

20 tháng 3 2022

Câu 2:
uses crt;
var s,i,n:integer;
begin clrscr;
s:=0;
write('Nhap n: ');readln(n);
for i:=1 to n do
if i mod 2 = 0 then inc(s,i);
write('Tong cac so le tu 1 den ',n,' la: ',s);
readln
end.

20 tháng 3 2022

Program HOC24;

var i,n: integer;

S,P: longint;

begin

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

{..............................................}

readln

end.

-----------------------------------------------------------

Bạn điền vào {........................} theo từng bài nhé

a) S:=0; 

for i:=1 to N do if i mod 2=1 then s:=s+i;

write('S= ',s);

b)

S:=0;

for i:=1 to N do if i mod 2=0 then s:=s+i;

write('S= ',s);

c) P:=1;

for i:=1 to N do if i mod 2=0 then p:=p*i;

write('P= ',p);

d)

P:=1;

for i:=1 to N do if i mod 2=1 then p:=p*i;

write('P= ',p);

4 tháng 5 2023

program TinhTongTich;

var

      N, i, Tong, Tich:integer;

begin

      writeln('Nhap so nguyen duong N:');

      readln(N);

      i:=1;

      Tong:=0;

      Tich:=1;

      while i<=N do

      begin

            Tong:=Tong+i;

            Tich:=Tich*i;

            i:=i+1;

      end;

      writeln('Tong cac so tu 1 den ', N, ' la: ', Tong);

      writeln('Tich cac so tu 1 den ', N, ' la: ', Tich);

      readln;

end.

17 tháng 2 2022

{PROGRAM Bai_tap1;
USES crt;
VAR n, i, C, L:Bytbe;
BEGIN 
  clrscr;
  Write('Nhap n:');Readln(n);
  C:=0;L:=0;
  For i:=1 to n do
    If i mod 2=0 then C:=C+i else L:=L+i;
  writeln('Tong cac so chan la:',C);
  writeln ('Tong cac so le la:',L);
  Readln;
end.  
}

21 tháng 4 2023
Viết hàm tính tích các số từ 1 đến n:

```
def tich_tu_1_den_n(n):
tich = 1
for i in range(1, n+1):
tich *= i
return tich
```

Hàm này sử dụng vòng lặp for để tính tích của các số từ 1 đến n. Ban đầu, ta khởi tạo biến tich bằng 1. Sau đó, ta lặp qua các số từ 1 đến n và nhân chúng vào biến tich. Cuối cùng, ta trả về giá trị của biến tich.

Viết hàm tính tổng các số chia hết cho 3 từ 1 đến n:

```
def tong_so_chia_het_cho_3(n):
tong = 0
for i in range(1, n+1):
if i % 3 == 0:
tong += i
return tong
```

Hàm này sử dụng vòng lặp for để tính tổng của các số chia hết cho 3 từ 1 đến n. Ban đầu, ta khởi tạo biến tong bằng 0. Sau đó, ta lặp qua các số từ 1 đến n và kiểm tra xem số đó có chia hết cho 3 không. Nếu có, ta cộng số đó vào biến tong. Cuối cùng, ta trả về giá trị của biến tong.

Với n=4 thì 

\(A=1^3+2^3+3^3+4^3=1+8+27+64=100\)

\(B=\left(1+2+3+4\right)^2=10^2=100\)

nên A=B

Với n=5 thì 

\(A=1^3+2^3+3^3+4^3+5^3=1+8+27+64+125=225\)

\(B=\left(1+2+3+4+5\right)^2=15^2=225\)

nên A=B

Với n=6 thì 

\(A=1^3+2^3+3^3+4^3+5^3+6^3=1+8+27+64+125+216=441\)

\(B=\left(1+2+3+4+5+6\right)^2=21^2=441\)

nên A=B