BOARDLOGO天府交友网向您保证：
总有一天你会在这里结识到理想的朋友、恋人、商友或者知己！

pascal如何输入一个字符，然后马上变成一个小圆点。

文章地址： http://www.tflove.com/jineng_sh/a22778.html
文章摘要：

uses crt; var i:longint; x,y:longint; begin while true do begin if keypressed then begin case upcase(readkey) of #8:begin x:=wherex; y:=wherey; if x1 then gotoxy(x-2,y) else gotoxy(1,y); write(' '); if x1 then gotoxy(x-2,y) else gotoxy(1,y); end; end; wri

生活技能分享

时间:2013-09-20 22:50来源:未知作者:admin 点击: 次《pascal如何输入一个字符，然后马上变成一个小圆点。》

uses crt;
var i:longint;
x,y:longint;
begin
while true do
    begin
      if keypressed then
    ,PAK格式文件如何能打开;    begin
          case upcase(readkey) of
            #8:begin
    ,pakpak文件如何打开;        x:=wherex;
           ,paipai如何开通; y:=wherey;
              if x>1 then gotoxy(x-2,y) else
              gotoxy(1,y);     write(' ');
        if x>1 then gotoxy(x-2,y) else
              gotoxy(1,y);
            end;
   ,paipai如何开通;         end;
          write('.'),p5000泡罩铝塑机如何使用？;
        end,P4中毒了如何办文件被隐藏了;
    end;
end.

(责任编辑：admin)

分享到: QQ空间 腾讯微博 腾讯朋友

收藏0

上一篇：PAK格式文件如何能打开下一篇：pascal如何输出滚动字符

		自动登录	找回密码
密码			赶紧注册吧