找回密码
赶紧注册吧

QQ登录

只需一步,快速开始

当前位置: 交友网 > 技能必杀技 > 生活技能分享 >

pascal如何输出滚动字符

文章地址: http://www.tflove.com/jineng_sh/a22779.html
文章摘要:
uses crt; var i,j:longint; begin gotoxy(1,1); for i:=1 to 5000 do write(' '); j:=0; while not keypressed do begin delay(500), pascal如何输入一个字符,然后马上变成一个小圆点。 ; gotoxy(1,1); for i:=1 to 40 do write(' '); gotoxy(j+1,1); inc(j); j:=j mod 20; writeln('Hello World
时间:2013-09-20 22:50来源:未知 作者:admin 点击: 次 《pascal如何输出滚动字符
uses crt;
var
  i,j:longint;
begin
  gotoxy(1,1);
  for i:=1 to 5000 do write(' ');
  j:=0;
  while not keypressed do
    begin
      delay(500),pascal如何输入一个字符,然后马上变成一个小圆点。;
      gotoxy(1,1);
  ,PAK格式文件如何能打开; ,pakpak文件如何打开;  ,paipai如何开通; for i:=1 to 40 do write(' ');
      gotoxy(j+1,1);
      inc(j);
     ,paipai如何开通; j:=j mod 20;
      writeln('Hello World!');
    end;
end.
这样就能够了,你用2.0以下的FREE PASCAL 运行尝尝看,有转动后果,p5000泡罩铝塑机如何使用?
(责任编辑:admin)
分享到: QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏0