LUPA首页 | 资讯 | 教程 | 下载 | 求职 | 方案 | 博客 | 交易 | 英文版
LUPA论坛


 
标题: 一道程序题,测试下大家的能力
本帖已经被作者加入个人空间
Rson
版主
Rank: 7Rank: 7Rank: 7


UID 33664
精华 0
积分 1090
帖子 63
LUPA币 1058 点
阅读权限 100
注册 2007-3-21
发表于 2007-4-14 21:25  资料 个人空间 短消息 
一道程序题,测试下大家的能力

某园林开始时有森林300公顷,第一年增长率为5公顷\年, 以后每年增长率为1公顷\年,试编程计算N年后森林增长面积。N由键盘输入.
  for 语句编写。

QUOTE:
sanool对帖子标题进行了编辑

顶部
[广告] 推荐个超酷的web2.0相册
ztsmile
关注开源
Rank: 2



UID 38382
精华 0
积分 84
帖子 7
LUPA币 80 点
阅读权限 20
注册 2007-4-11
来自 安徽
发表于 2007-4-16 10:14  资料 主页 个人空间 短消息  QQ
C版的

int main(){
  int i,n,m;
  scanf(%d,&n);
  for(i=1;i<=n;i++)
    if (n=1)
      m=300+5;
    if(n>=2)
      m+=1;
  printf("%d",m);
}
顶部
[广告] 推荐个超酷的web2.0相册
infohunter (InfoHunter)
特约撰稿人
Rank: 8Rank: 8


UID 23340
精华 0
积分 1832
帖子 245
LUPA币 1709 点
阅读权限 100
注册 2006-7-25
来自 沈阳
发表于 2007-4-16 11:57  资料 主页 个人空间 短消息  QQ


QUOTE:
原帖由 ztsmile 于 2007-4-16 10:14 发表

    if (n=1)
      m=300+5;

呵呵
if(n == 1)
顶部
[广告] 推荐个超酷的web2.0相册
ztsmile
关注开源
Rank: 2



UID 38382
精华 0
积分 84
帖子 7
LUPA币 80 点
阅读权限 20
注册 2007-4-11
来自 安徽
发表于 2007-4-16 13:09  资料 主页 个人空间 短消息  QQ
是啊

太大意了,程序员最忌讳的事被我给碰上了,唉,谢谢提醒哦....




笑对人生,即使不快乐!
顶部
skyflaycc111
关注开源
Rank: 2



UID 39297
精华 0
积分 105
帖子 9
LUPA币 100 点
阅读权限 20
注册 2007-4-16
发表于 2007-4-16 13:15  资料 短消息 
确实现在的语言切换的多了,会在一些小细节上出问题,而这又是偶们需要注意的,偶刚开始是用的c,后来转到delphi,起初就常常犯错,现在固定了,也就习惯了~~~
顶部
ztsmile
关注开源
Rank: 2



UID 38382
精华 0
积分 84
帖子 7
LUPA币 80 点
阅读权限 20
注册 2007-4-11
来自 安徽
发表于 2007-4-16 13:31  资料 主页 个人空间 短消息  QQ
呵呵

记得我上次在哪看到过,可以把 (n=1)写成(1=n),那么在编译的时候就会提醒错误,这样就不会在程序冗长的时候一行一行的查看错误到底在什么地方了,如果写成前者,则错误很难发现哦




笑对人生,即使不快乐!
顶部
Rson
版主
Rank: 7Rank: 7Rank: 7


UID 33664
精华 0
积分 1090
帖子 63
LUPA币 1058 点
阅读权限 100
注册 2007-3-21
发表于 2007-4-16 20:20  资料 个人空间 短消息 
这样呢?
#include    <stdio.h>
main()
{
   int i=5,n,a,sum=300;
   printf("qing shu ru yi ge shu\n");
   scanf("%d",&a);
   for(n=1;n<=a;n++)
     if(n==1) sum=sum+i;
       else  sum++;
   printf("%d\n",sum);
}
顶部
tanghaiwei
开源主力军
Rank: 3Rank: 3
反黑战士


UID 19096
精华 0
积分 1772
帖子 218
LUPA币 1663 点
阅读权限 30
注册 2006-4-18
来自 宁波大学
发表于 2007-4-16 22:08  资料 主页 个人空间 短消息  QQ
第一年增长率为5公顷\年, 以后每年增长率为1公顷\年,
作何解释?
顶部
up181
开源主力军
Rank: 3Rank: 3


UID 31893
精华 0
积分 919
帖子 58
LUPA币 890 点
阅读权限 30
注册 2007-3-3
发表于 2007-4-16 22:09  资料 个人空间 短消息 
用For的话用Pascal可以这样描述。
function area(n:integer): Integer;
var
  i,sum:Integer;
begin
  for i:=1 to n do
  begin
     if i=1 then
       sum:=300+5
     else Inc(sum);
  end;
  Result:=sum;
end;

不过如果不用for可以很简单来实现
function area(n:integer): Integer;
begin
  if n=1then Result :=300+5
  else Result :=300+5+(n-1);
end;
顶部
Rson
版主
Rank: 7Rank: 7Rank: 7


UID 33664
精华 0
积分 1090
帖子 63
LUPA币 1058 点
阅读权限 100
注册 2007-3-21
发表于 2007-4-17 08:09  资料 个人空间 短消息 
对于新手,for循环也是应该掌握的吖
顶部
 


当前时区 GMT+8, 现在时间是 2008-7-6 06:48
浙ICP备06002895号

    本论坛支付平台由支付宝提供
携手打造安全诚信的交易社区 Powered by Discuz! 5.0.0  © 2001-2006 Comsenz Inc.
Processed in 0.033733 second(s), 6 queries , Gzip enabled

清除 Cookies - 联系我们 - LUPA开源社区 - Archiver - WAP