Truyen2U.Net quay lại rồi đây! Các bạn truy cập Truyen2U.Com. Mong các bạn tiếp tục ủng hộ truy cập tên miền mới này nhé! Mãi yêu... ♥

pas cau 13

var

n,i:integer;

s:real;

write('nhapn');

readln(n);

s:=1;

for i:=1 to n do

s:=s*i;

write('tongla:',s:4:1);

readln;

end.

Bạn đang đọc truyện trên: Truyen2U.Com

Tags: #câu#pas