回复：【NOIP奥赛得过奖的请进】

60.232.60.*

快试试吧，
可以对自己使用挽尊卡咯~

◆

149102061 学校刚组织的我只是刚刚入门可以给我介绍一下经验吗?我现在上初二

（源程序名：xx1.pas，可执行文件名：xx1.exe）
（输入文件名：xx1.in，输出文件名：xx1.out）
问题描述
在数学上，有这样一个概念：阶乘。一个整数n的阶乘（n!）是这样定义的：
当n=1时，有n!=1 即1！=1；
当n>1时，有n!=n*(n-1)!，即：fac(n)=n*fac(n-1)；
特别规定，0的阶乘为1，即0！=1。
比如5！=5*4！=5*4*3！=5*4*3*2！=5*4*3*2*1！=5*4*3*2*1=120
要求：当给定一个整数后，求出其阶乘。
本题输入文件只包含一行，其内容是一个整数，即n的值，
输出文件也仅含一行，其内容也是一个整数，即对应的阶乘值。
[输入输出样例]：
输入：
5
输出：
120

高手们,这个题目怎么做呀?快帮忙,这也是比赛的题目

不感兴趣

开通SVIP免广告

219.145.167.*

快试试吧，
可以对自己使用挽尊卡咯~

◆

var n,i:integer;
x:int64;
begin
readln(n);
x:=1;
for i:=1 to n do x:=x*i;
writeln(x);
end.

随手写的没有编译

61.186.82.*

快试试吧，
可以对自己使用挽尊卡咯~

◆

我普及组二等�

program xx(input,output);
var
a,b:integer; input,output:text;
begin
assign(input,'xx1.in');assign(output,'xx1.out');
reset(input);rewrite(output);
read(input,a);
b:=a+1;
write(b);
close(input);close(output);
end.

这个生成可执行文件时,输入数据,但显示不出结果,到底程序错在哪里?请高手指点