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

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

这是一个随机数游戏，输入一个数，它会跟你说太大还是太小，只有十次机会。一个很无聊的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

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