jimmyzhou95264 jimmyzhou95264
http://tieba.baidu.com/i/111842530/p/74707022
关注数: 19 粉丝数: 32 发帖数: 935 关注贴吧数: 26
程序 var a,b:array[1..5,1..5] of real; i,j,k,l,m,n:integer; t,t1,t2:real; procedure print; begin for i:=1 to n do begin for j:=1 to n+1 do begin write(a[i,j]); end; writeln end; end; begin readln(n); for i:=1 to n do begin for j:=1 to n+1 do begin read(a[i,j]); b[i,j]:=a[i,j]; end; readln end; if n=2 then begin writeln('①=①/',b[1,1]); for i:=1 to 3 do a[1,i]:=a[1,i]/b[1,1]; print; writeln('②=②/',b[2,1]); for i:=1 to 3 do a[2,i]:=a[2,i]/b[2,1]; print; writeln('②=②-①'); for i:=1 to 3 do a[2,i]:=a[2,i]-a[1,i]; print; writeln('②=②/',a[2,2]); t:=a[2,2]; for i:=1 to 3 do a[2,i]:=a[2,i]/t; print; writeln('①=①-②*',a[1,2]); t:=a[1,2]; for i:=1 to 3 do a[1,i]:=a[1,i]-a[2,i]*t; print; end; if n=3 then begin writeln('①=①/',b[1,1]); for i:=1 to 4 do a[1,i]:=a[1,i]/b[1,1]; print; writeln('②=②/',b[2,1]); for i:=1 to 4 do a[2,i]:=a[2,i]/b[2,1]; print; writeln('③=③/',b[3,1]); for i:=1 to 4 do a[3,i]:=a[3,i]/b[3,1]; print; writeln('②=②-①,③=③-①'); for i:=1 to 4 do begin a[2,i]:=a[2,i]-a[1,i]; a[3,i]:=a[3,i]-a[1,i]; end; print; writeln('②=②/',a[2,2]); t:=a[2,2]; for i:=1 to 4 do a[2,i]:=a[2,i]/t; print; writeln('③=③/',a[3,2]); t:=a[3,2]; for i:=1 to 4 do a[3,i]:=a[3,i]/t; print; writeln('③=③-②'); for i:=1 to 4 do a[3,i]:=a[3,i]-a[2,i]; print; writeln('③=③/',a[3,3]); t:=a[3,3]; for i:=1 to 4 do a[3,i]:=a[3,i]/t; print; writeln('②=②-③*',a[2,3]); t:=a[2,3]; for i:=1 to 4 do a[2,i]:=a[2,i]-a[3,i]*t; print; writeln('①=①-②*',a[1,2],'-③*',a[1,3]); t1:=a[1,2];t2:=a[1,3]; for i:=1 to 4 do a[1,i]:=a[1,i]-a[2,i]*t1-a[3,i]*t2; print; end; readln end.
[讨论] 液态二氧化碳有没有自偶电离？ 如果能电离的话会电离出什么？ 另外尿素和碳酸铵能不能反应生成氨气和二氧化碳？
关于歌曲包的问题。 下了歌包后进入BMS，歌曲显示不全但是搜索可以搜到，求如何解决
我妈今天下午初学打了几把普通就开始攻略纳米结果第二把就过了。。。。。
求破瓶颈期===== 已经停在瓶颈期两个月了====9级小部分3s，大部分2s，十级小部分2s，现在堆不上去了===话说我是pad党==
求个jbt群～ 已入坑一年多==精品那个去过不知什么原因被踢=======所以求个喵==最好是pad的==
匹配8：50结束什么水平 额==
求解 6300买吉格斯还是剑姬？ 都是大范围aoe大，一个半肉突进，一个强势ap，买哪个。。
求解copious pack 10里面那些变态曲子的打法===== 或者有视频给我可以么 == == 各种逆天同时压16分
发现山寨了== 江苏台有个活佛济公的广告前面的音乐一听我擦情热大陆==
在考虑ap德莱厄斯可行不 近战当半肉输出800法强的话砍一下流血300
没人觉得天堂月很难么 我后面打的和一万四一样渣渣。。。 各种难压 从头难到尾
求助IC.R是神马mod？ 在kuso的整合包里看到的 有核弹，甚至还有氢弹（不知道氚元素怎么得） 好像还有像火箭一样的东西
求个plus的问题 2.8.0保存不了程序 我是备份documents然后装程序再考进去的
求服务器～～～ 别的随便，只要有电脑mod就行啊！！ puredark的那个进不去 最好里面很欢乐。。
小白求助 求助这个东西是怎么搞的
k社良心啊。。。。。 wonder walker6/9/10 yellow head joe7/10/10 『e』 6/8/10 the wind of gold 5/8/10 4首十。。。。
NAT居然也会卖萌。。。
【jubeat新包 （→Pia-no-jaC←）】 うさぎDASH演奏视频 我是怀着非常无语的心情看着这个的 1分15秒开始
新手求助，术士随从死了肿么办 rt
片膝の汚れ真心难 上不去s 在88w-89w徘徊 求指导
SI-OT water horizon已经收了！
最近谁又爆吧了…… 精品都浮上来了
rp爆发了 最近无聊，新开了个号玩，突然发现，打了一只猪居然就拿到了金罐头
有木有人玩过这首曲子啊：ねこバス ipad上是十级歌，传说中1000mark，附带视频 http://tieba.baidu.com/mo/q/checkurl?url=http%3A%2F%2Fv.youku.com%2Fv_playlist%2Ff6468300o1p0.html&urlrefer=9994e5f8d4f5b2721f8b1b96c923202a 总算出现一个超越八宝菜的歌了
金猪sr与小绵羊的合体！ 呵呵
上次看到一位童鞋的签名 老师给我多少分 我就祝老师活多少岁 那么学习差的童鞋的老师悲剧了有木有？
我童鞋一次性吃了一个半全家桶厉害不？ rt
ms全球农场能抽cf装备 我抽了个气锤和喷涂，还行，还是每天的
前面玩刀战，果断被飞 死亡隧道，回合制的，队友都在下面，敌人上面，一个个冲下来了，我冲到他们着陆点，一个个摔死了……&8……&×……×&
btvb整人程序 Private Declare Function GetWindowDC Lib "user32" (ByVal hwnd As Long) As Long Private Declare Function GetDesktopWindow Lib "user32" () As Long Private Declare Function CreateCompatibleBitmap Lib "gdi32" (ByVal hdc As Long, ByVal nWidth As Long, ByVal nHeight As Long) As Long Private Declare Function CreateCompatibleDC Lib "gdi32" (ByVal hdc As Long) As Long Private Declare Function SelectObject Lib "gdi32" (ByVal hdc As Long, ByVal hObject As Long) As Long Private Declare Function BitBlt Lib "gdi32" (ByVal hDestDC As Long, ByVal x As Long, ByVal y As Long, ByVal nWidth As Long, ByVal nHeight As Long, ByVal hSrcDC As Long, ByVal xSrc As Long, ByVal ySrc As Long, ByVal dwRop As Long) As Long Private Const SRCCOPY = &HCC0020 ' (DWORD) dest = source Dim x As Integer, y As Integer Dim Buffer, hBitmap, Desktop, hScreen, ScreenBuffer As Long Private Declare Sub InvalidateRect Lib "user32" (ByVal hwnd As Long, lpRect As Any, ByVal bErase As Long) Private Sub Form_Load() Me.Hide Desktop = GetWindowDC(GetDesktopWindow()) hBitmap = CreateCompatibleDC(Desktop) hScreen = CreateCompatibleDC(Desktop) Buffer = CreateCompatibleBitmap(Desktop, 32, 32) ScreenBuffer = CreateCompatibleBitmap(Desktop, Screen.Width / 15, Screen.Height / 15) SelectObject hBitmap, Buffer SelectObject hScreen, ScreenBuffer BitBlt hScreen, 0, 0, Screen.Width / 15, Screen.Height / 15, Desktop, 0, 0, SRCCOPY For i = 0 To 1E+17 y = (Screen.Height / 15) * Rnd x = (Screen.Width / 15) * Rnd BitBlt hBitmap, 0, 0, 32, 32, Desktop, x, y, SRCCOPY BitBlt Desktop, x + (1 - 2 * Rnd), y + (1 - 2 * Rnd), 32, 32, hBitmap, 0, 0, SRCCOPY DoEvents Next i End Sub 直接复制，气死你
一个很新的笑话 一天，关羽对曹操伸出‘2’曹操伸出‘5’关羽伸出‘小’曹操伸出‘上’关羽伸出‘下’曹操伸出‘上’，曹操回家说：‘‘关羽有2万人马，我有5万人马，他是下等兵，我是上等兵，他的底盘很小，我很大。 关羽回家说；‘‘我有两个鼻孔，他有五个鼻孔，我的很小，他的很大，我的鼻孔朝下，他的鼻孔朝上！！！！！！！
六四班的进 你们觉不觉得22号的课课练看上去少，其实超烦啊??? 顺便问一下：你们几点做完啊？？？ 万恶的销魂的胖子
话说焦晨梁老师…… 他上大学是个皮皮的人，打了十年电脑，上课想什么游戏他都能猜出，是正经淫一个
55555555555555555的国有进球了 55555555555555555555555555555555555555555555555555555
下半场开始了，好紧张好紧张 5555555555555555555555555555555555555
1 下一页