[原创]阶乘 — 编程爱好者社区

沙发

qwertyiop [专家分：10] 发布于 2009-04-12 17:56:00

好简单

板凳

日奈森亚梦 [专家分：150] 发布于 2009-04-12 18:13:00

qwertyiop你复习的怎样？？？？？？？？？？？？？？？？

3 楼

日奈森亚梦 [专家分：150] 发布于 2009-04-12 18:14:00

复习的好(⊙_⊙)？

4 楼

日奈森亚梦 [专家分：150] 发布于 2009-04-12 18:18:00

偶是新手！你们能给我加油(⊙_⊙)？

5 楼

日奈森亚梦 [专家分：150] 发布于 2009-04-13 19:19:00

哎，上个月编程考试了！有一题运行错误，这样让我难受极了(╯﹏╰）~~~~~~

6 楼

小田甜 [专家分：3910] 发布于 2009-04-15 13:09:00

var
  m,n:real;
  i:byte;
begin
  n:=0;
  m:=1;
  for i:=1 to 10 do begin
    m:=m*i;
    n:=n+m;
  end;
  write(n);
end.
没调，可能有错。

7 楼

woshizhu [专家分：30] 发布于 2009-04-17 15:20:00

Program wmr;
  var s,i:integer;
  begin
      s:=1;
      for i;=1 to 10 do
      s:= s*i;
      writeln(s);
  end.

8 楼

wsczwm [专家分：0] 发布于 2009-04-19 16:14:00

楼上几种的算法都不准确，（上一层的还是错的）
本题最准确的解法是那字符串和数组来做。
具体方法希望你们自己去想

9 楼

angwuy [专家分：2280] 发布于 2009-04-24 12:41:00

迭代高精度..

10 楼

小令00 [专家分：1040] 发布于 2009-04-24 22:22:00

10！不是很大的数
4个字节一般足够了
（不知道pascal里 int 类型是几个字节，范围是多大）

8楼讲的“字符串”
我很难理解
感觉毫无必要

您尚未登录，请登录后再回复。点此登录或注册

主题：[原创]阶乘