pascal吧

93

2016-08-18

【游戏】Pascal程序接龙，FP用户进

本楼为Pascal程序接龙，使用语法必须为Freepascal所支持，不支持者会被删除（Delphi党注意）恶意进行死循环/for i:=-3267……

🧑82111668_2012

2

2016-08-17

我是渣渣，求助

如何打出杨辉三角？ 1 1 1 1 2 1 1 3 3 1 1 4 6 4 1 1 5 10 10 5 1 ……

🧑jct傻子

0

2016-08-17

devsiki Unity2D游戏开发2D Roguelike拾荒者教程

最新的课程出来了《拾荒者》，这个课程一共22个课时，教你学习Unity2D游戏开发，这个课程也是根据Unity5.2来开发的哦！里面的代码量比坦克大战要多……

🧑破铜烂铁960

9

2016-08-17

新手求助图形打印问题！

🧑玖殃_

6

2016-08-16

请问如何用归并求出逆序对个数

题目如下 1、逆序对个数（deseq.pas）【题目描述】给出一个数列{an}，如果存在 i<j，但是 a[i]>a[j]那么我们称 a[i]与 a[j……

🧑萌的葱葱

0

2016-08-16

求哪里错了，题目名称叫合并果子

var j,k,n,r,i,m,y,ans,x:longint; a,b:array[1..100000] of longint; procedure q……

🧑爱火影的史蒂夫

0

2016-08-16

求帮忙，跪谢

1057: 三角形问题时间限制: 1 Sec 内存限制: 128 MB 提交: 25 解决: 17 [提交][状态][讨论版]题目描述输入绳子的长度n，……

🧑兲煷説脕鮟wlk

26

2016-08-16

如何求2个数的最大公约数和最小公倍数

我发现我真的是很失败。前天我们老师满怀激情、唾沫横飞、口水四溅的讲了10分钟，“如何求2个数的最大公约数和最小公倍数”。可我还是，没听懂。哪位帮忙讲一下谢……

🧑璐村惂鐢ㄦ埛_005DADQ馃惥

21

2016-08-16

Winecraft2世代の表紙と製作決定！

然而我日語並不會好⋯⋯其實我做了好多但是沒有放⋯⋯現在慢慢來吧。喚些好友來@炎龙电脑工作室 @EXPsta @南昴宿星团嗯就這麼多

🧑莫昶旭

52

2016-08-16

写点代码

program Hello_World; begin writeln('Hello World'); readln; end.

🧑Alex1412yang

5

2016-08-15

哪位对帕斯卡，有兴趣的朋友愿意留下QQ，我们一起讨论？

ps：我是新手！

🧑王植尉😿

3

2016-08-15

lazarus按f8为什么无法单步执行？？？？？

lazarus版本是2.6.4-win64鄙人64位win10操作系统，不装这个版本根本就debugger。原来以为一切事都没有了，结果发现居然不能单步执……

🧑陈橘子同学

82

2016-08-15

[伪教程]用Pascal编游戏

1L给度娘防吞

🧑courage17340

7

2016-08-15

大家好！学哪一种pascal语言比较好？

🧑王植尉😿

1

2016-08-14

求助！在pascal编程时怎么在输出显示中文？

🧑王植尉😿

0

2016-08-14

Welcome to Cemic! 2016夏季限时纳新

🧑猎自然

5

2016-07-16

大神们求解答

想用crt做个小游戏什么的但却发现输出不了了怎么破

🧑谁看谁是谁看谁

7

2016-08-14

小游戏【持续跟新】

暑假了无聊做一个关于对战的。还是只有crt；目前这个版本简直比贪吃蛇还无聊，因为只编了几个小时。我会陆续更新的。希望不要又成为一个坟贴。

🧑冥蓝炎

0

2016-08-14

求教一道题目

牛的排列时间限制: 1 Sec 内存限制: 128 MB 【题目描述】 N(1 <= N <= 20)头牛正在和FJ玩另一个疯狂的游戏。牛会将自己排列好……

🧑☜滑稽😂大帝☞

7

2016-08-14

pascal小白，求大神们解。。。作业要来不及了

题目描述输入正整数n，求 S = 1 + 1*2 + 1*2*3 + … + 1*2*3*…*n 的值输入只有一行且只有一个正整数：n ( 1 <=……

🧑兲煷説脕鮟wlk

3

2016-08-12

一个小发现

无意中发现现在吧里的新帖百分之八十以上都是小白问问题啊……

🧑Danger494

18

2016-08-12

【求助】怎么用PASCAL语言表示X的N次方……

- -初学者请多指教。　　￣――◇→☆ 我的心‘ 　　　　　　　　　　来不来’呢。★←◆＿＿￣

🧑※日向☆凌雪※

2

2016-08-11

这一题怎么做

求教 var a,b,c:integer; begin readln(a,b,c); if b<c then writeln(a,' ',c,' ',b)……

🧑仙楽▫