Viết thuật toán tính tích của n số tự nhiên liên tiếp(n nhập vào từ bàn phím)

Var i ,n : integer;

S ,T : real;

Begin

write ['n='] ; read [n] ;

S:= 0;

T:= 1;

For i:= 1 to n do

S:= S + i;

T:= T * i

Writeln [' Tong cua ' ,n,' so dau tien la' , S ];

Writeln [' Tich cua ' ,n,' so dau tien la' , T ];

Readln;

End.

Hay nhất

Phần a

Bước 1: Nhập số nguyên dương N Bước 2: S ←0; i ←1 Bước 3: Nếu i> N thì đưa ra tổng S và kết thúc. Ngược lại sang bước 4 Bước 4: S ←S+i Bướ c 5: i ← i+1 quay lại bước 3

Phần b

Bước 1: Nhập số nguyên dương N Bước 2: S←0; i←1 Bước 3: Nếu i> N thì đưa ra tổng S và kết thúc. Ngược lại sang bước 4 Bước 4: S←S+i Bướ c 5: i← i+2 quay lại bước 3

Top 1 ✅ Bài 1 :mô tả thuật toán tính tích của n số tự nhiên [n!] và viết chương trình bài 2: mô tả thuật toán tính tổng của n số tự nhiên đầu tiên và viết ch nam 2022 được cập nhật mới nhất lúc 2022-03-12 22:15:00 cùng với các chủ đề liên quan khác

bài 1 :mô tả thuật toán tính tích c̠ủa̠ n số tự nhiên [n!] ѵà viết chương trình bài 2: mô tả thuật toán tính tổng c̠ủa̠ n số tự nhiên đầu tiên ѵà viết ch

Hỏi:

bài 1 :mô tả thuật toán tính tích c̠ủa̠ n số tự nhiên [n!] ѵà viết chương trình bài 2: mô tả thuật toán tính tổng c̠ủa̠ n số tự nhiên đầu tiên ѵà viết ch

bài 1 :mô tả thuật toán tính tích c̠ủa̠ n số tự nhiên [n!] ѵà viết chương trìnhbài 2: mô tả thuật toán tính tổng c̠ủa̠ n số tự nhiên đầu tiên ѵà viết chương trình

giúp hộ mik đg cần gấp cảm ơn !

Đáp:

hongocha:

Bài 1:

*Mô tả thuật toán:

Input: n số tự nhiên

Output: n!

$B1:$ Nhập n

$B2:$ S←1; i←1;

$B3:$ Nếu i