24小时热门版块排行榜    

北京石油化工学院2026年研究生招生接收调剂公告
查看: 8327  |  回复: 145
本帖产生 1 个 程序强帖 ,点击这里进行查看

杨凯军1990

金虫 (小有名气)


小木虫: 金币+0.5, 给个红包,谢谢回帖
内容已删除
相信好人会有好报的
141楼2014-10-26 18:57:49
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

溪行有声

新虫 (初入文坛)


小木虫: 金币+0.5, 给个红包,谢谢回帖
楼主大神您好,我正在学VB,在学习利用VB进行雅克比迭代解线性方程组是卡住了,求帮忙,另外VB解矩阵实在烦,学VB可以绕过这些,利用matlab

Private Sub Form_Click()
Dim a%(3, 3), b%(3), x#(3), y#(3), k#(3), s As Double, e#, Max
e = Val(InputBox("请输入精度e")
For i = 0 To 3
  x(i) = Val(InputBox("请任意输入一个数X")
Next i
For i = 0 To 3
For j = 0 To 3
   a(i, j) = Val(InputBox("请输入A")
Next j
b(i) = Val(InputBox("请输入B")
Next i
t = 0

Do
For i = 0 To 3
For j = 0 To 3
If i <> j Then
  s = s + a(i, j) * x(j)
  End If
  y(i) = (b(i) - s) / a(i, i)
  t = t + 1
Next j
Next i
For i = 0 To 3
k(i) = Abs(x(i) - y(i))
Next i
Max = k(0)
For i = 1 To 3
If Max < k(i) Then Max = k(i)
Next i

For j = 0 To 3
x(j) = y(j)
Next j

Loop Until Max < e Or t < 100
For i = 0 To 3
Print Tab(4 * j); y(i);
Next i
For i = 0 To 3
For j = 0 To 3
  Print Tab(5 * j); a(i, j);
Next
Next
For i = 0 To 3
Print Tab(5 * j); b(i);
Next
Print t
End Sub
如解我多周之疑惑,将不胜感激
142楼2015-01-18 22:56:32
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

sunny0_0yao

新虫 (初入文坛)


小木虫: 金币+0.5, 给个红包,谢谢回帖
我现在在打包一个程序,可是一直有问题,是这样的:我使用VS2010写了一个MFC程序,设置了MFC静态编译、ATL静态链接、多线程(/MT)可以将程序正常打包,mfc中使用了teechart的插件,打包时将其属性设置为自注册,启动项目与目标项目的条件设置的一致,都用的.NET Framework 4.0,系统必备使用的是"从组件供应商的网站下载系统必备组件",打包过程中没有错误和警告,安装过程也很正常,但是安装后双击exe文件,会弹出对话框提示“应用程序无法正常启动(0xc0000142)。请单击‘确定’来关闭应用程序”。使用过两台电脑均出现这样的情况,请问是哪里出现问题了,应如何处理?
143楼2015-02-14 08:04:54
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

tgvictor99

木虫 (知名作家)

迷糊领域荣誉领主


小木虫: 金币+0.5, 给个红包,谢谢回帖
最近在研究VC++的MFC,想结合用matlab写好的算法,做一个简单的界面,不过进展很缓慢。不知道楼主有什么建议没??
每个人的人生都是时代的产物。每个人的血统、命运和梦想组成了现在这个时代。
144楼2015-02-15 21:43:50
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

董昌316

新虫 (初入文坛)


小木虫: 金币+0.5, 给个红包,谢谢回帖
你好我主要就是想问,怎么用C++把
function [W,E,T,iter] = kspdp4(X,lambda, gamma, tol,W,E)
[d,n] = size(X);
if nargin < 6
    W = zeros(n,n);
    E = zeros(d,n);
end
if nargin < 4
    tol = 1e-2;
end
if nargin < 3
   
    gamma = 0.1*lambda;
改写呢?
我试了int i, j;
        float a[N][N], b[D][N];
        int n,d,t;
        std::cout << "输入输入参数的个数t=";
        std::cin >> t;
        cout << "请输入" << t<< "个参数: \n";
         i = t;
这样子好像根本就没把手动输入的数赋值给i,下面的也就根本判断不出来啊
if (i < 6) .....
if(i<4)......

» 本帖附件资源列表

  • 欢迎监督和反馈:小木虫仅提供交流平台,不对该内容负责。
    本内容由用户自主发布,如果其内容涉及到知识产权问题,其责任在于用户本人,如对版权有异议,请联系邮箱:xiaomuchong@tal.com
  • 附件 1 : 新建_Microsoft_Word_文档_(3).doc
  • 2015-04-07 22:05:12, 13.5 K
145楼2015-04-07 22:08:39
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

谭留香

新虫 (初入文坛)


小木虫: 金币+0.5, 给个红包,谢谢回帖
送红花一朵
lz我学完了c++的基础知识,想要深入学习c++还需要学那些知识,有什么书可以推荐的,谢谢。
146楼2015-04-24 21:13:13
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 magic7004 的主题更新
普通表情 高级回复 (可上传附件)
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 调剂 +11 不逢春 2026-04-05 12/600 2026-04-06 22:41 by chenzhimin
[考研] 297分083200求助 +9 aekx 2026-04-05 9/450 2026-04-06 20:57 by flysky1234
[考研] 081200-11408-276学硕求调剂 +5 崔wj 2026-04-05 5/250 2026-04-06 15:40 by lin-da
[考研] 第一志愿东南大学物理313,有科研竞赛获奖经历,希望物理复试调剂 +3 马内橙 2026-04-05 3/150 2026-04-06 10:32 by 蓝云思雨
[考研] 272求调剂 +4 电气李 2026-04-05 4/200 2026-04-05 10:41 by lbsjt
[考研] 一志愿电子科技大学085600材料与化工 329分求调剂 +10 Naiko 2026-04-04 10/500 2026-04-05 09:40 by sam3303
[考研] 材料调剂 +10 懒羊羊轻置玉臀 2026-04-02 11/550 2026-04-04 21:56 by laoshidan
[考研] 316求调剂 +9 墨辰_Orion926 2026-04-04 9/450 2026-04-04 21:35 by lbsjt
[考研] 一志愿上海大学生物学346 +3 上海大学346调剂 2026-04-03 3/150 2026-04-04 20:20 by dongzh2009
[考研] 085701求调剂 +7 龚禹铭 2026-04-04 8/400 2026-04-04 13:49 by 小小树2024
[考研] 282求调剂 +20 ycy1201 2026-04-01 22/1100 2026-04-04 00:42 by userper
[考研] 274求调剂 +9 顺理成张 2026-04-03 10/500 2026-04-03 15:10 by 啊俊!
[考研] 289-求调剂 +4 这里是_ 2026-04-03 4/200 2026-04-03 14:23 by 1753564080
[考研] 319求调剂 +18 太容易1018 2026-04-01 18/900 2026-04-03 11:18 by linyelide
[考研] 312求调剂 +6 小小墨123 2026-04-02 7/350 2026-04-03 07:32 by jsw79
[考研] 交通运输考试264分求工科调剂 +4 jike777 2026-04-02 4/200 2026-04-02 21:53 by zllcz
[考研] 一志愿346上海大学生物学 +3 上海大学346调剂 2026-04-01 3/150 2026-04-02 08:36 by w虫虫123
[考研] 085600 一志愿9 总分351 求调剂学校 +7 czhcz 2026-03-31 9/450 2026-04-01 19:24 by 无际的草原
[考研] 267求调剂 +13 uiybh 2026-03-31 13/650 2026-04-01 10:25 by 探123
[考研] 326求调剂 +4 崽崽仔 2026-03-31 4/200 2026-04-01 09:58 by 我的船我的海
信息提示
请填处理意见