要按要求输入哦，否则会自动关闭

这是啥？请介绍多一点
另外这是ＬＺ自己编的吗？
如果不是请表明转载＋原地址谢谢

自己乱编的.............

这是一个随机数游戏，输入一个数，它会跟你说太大还是太小，只有十次机会。一个很无聊的PASCAL游戏

猜数字的是吧……

程序先产生随机数
然后你自己猜是什么数字……

下了玩了- -
蛮简单的其实- -
打发打发无聊时间不错...

于是这东西让我想起了牧场物语里的新年猜数游戏……

程序也很简单
var
z,j,h,p:integer;
begin
repeat
randomize;
z:=random(100);
j:=0;
repeat
write('Please input a number(0-100):');
read(h);
j:=j+1;
if h=z then writeln('You are right!');
if h>z then writeln('Too big,please try again!');
if h<z then writeln('Too small,please try again!');
until (h=z)or(j=10);
if(j=10)and(h<>z) then writeln('You are fail.The number is',z);
writeln('Do you play again?(1=yes,0=no)');
read(p);
until p=0;
end.

对了 全屏按Alt+Enter

那段代码……有点看不懂哈………………

发现原来Basic语言那么容易理解

于是我是路过的……于是数字什么最讨厌了……

不会啊 我觉得PASCAL和C++挺好的