Chủ đề / Chương

Bài học

tung nguyentai
TN

tung nguyentai
Học tại trường Chưa có thông tin
Đến từ Chưa có thông tin , Chưa có thông tin
Số lượng câu hỏi 0
Số lượng câu trả lời 11
Điểm GP 0
Điểm SP 5

Người theo dõi (1)

VA
võ thị lan anh

Đang theo dõi (1)

QN
Qynh Nqa

TN

Câu trả lời:

B3

program B3;

uses crt;

var i,n,s :integer;

begin

clrscr;

s:=1;

write('Nhap so cac so : ');Readln(n);

for i:=1 to n do

begin

s:=s*i;

end;

write('Tich : ',s);

end.
TN
TN

chúc bạn mạnh khỏe và học thật giỏi
TN
TN
TN
TN
TN
TN
TN