24小时热门版块排行榜

返回列表

当前主题已经存档。

【悬赏金币】回答本帖问题，作者willmyth将赠送您 20 个金币

willmyth

银虫 (正式写手)

准木虫

应助: 0 (幼儿园)
贵宾: 0.02
金币: 389.8
帖子: 665
在线: 3.6小时
虫号: 330373
注册: 2007-03-24
性别: GG
专业: 水利/水文

[求助] 【50金币求VC++计算程序移植到VB】+【有效期至2008年10月1日】

有个简单的VC++计算程序想用VB来编，请虫子们帮忙。
要求：1、运行结果与VC++运行一致；
   2、VB编的程序能单独使用，也就是说在没有安装VB的情况下也能使用。
如能以TXT或excel格式输出更好。

金币不够麻烦版主修改

联系QQ：6660789

vc++源程序
#include
void main()
{
int h,i,k=0;
double j,t,a[6],b[6],c[50];
h=0;
cout<<"按顺序输入6个时间值:\n";
for(i=0;i<6;i++)
cin>>a;
cout<<"按顺序输入6个流量值:\n";
for(i=0;i<6;i++)
cin>>b;
cout<<"\n时段长△t=\n";
cin>>t;
for(j=a[2];j>a[0];j=j-t)
{for(i=0;i<2;i++)
   if(j>=a&&j    {c[k]=(b[i+1]-b)/(a[i+1]-a)*(j-a)+b;
   k++;}
}
h=k;
for(k=0;k {cout< if((k+1)%8==0) cout<<'\n';
}
k=h;
for(j=a[2];j {for(i=2;i<6;i++)
   if(j>=a&&j    {c[k]=(b[i+1]-b)/(a[i+1]-a)*(j-a)+b;
   k++;}
}
for(k=h;k<50;k++)
{cout< if((k+1)%8==0) cout<<'\n';
}
}

[ Last edited by willmyth on 2008-7-30 at 14:13 ]

回复此楼

» 猜你喜欢

牛奶是挤出来的，牛人是逼出来的

1楼 2008-07-30 08:01:24

已阅回复此楼关注TA 给TA发消息送TA红花 TA的回帖

相关版块跳转我要订阅楼主 willmyth 的主题更新

返回列表

不应助 确定回帖应助 (注意：应助才可能被奖励，但不允许灌水，必须填写15个字符以上)

普通表情龙兔虎猫