微信公众号 
图码生活

每天发布有五花八门的文章,各种有趣的知识等,期待您的订阅与参与
电脑报 1992-2001 十年文章全集
电脑报 1992-2001 十年文章全集
包含从 1992 年 - 2001 年间,两万余篇期刊文章,查询最少输入两个字符
随便看看
读取中
读取中
标题计算机素描:他是谁?
栏目网络应用
作者刘井坤
发布1998年第12期13版
  曾经在一本杂志上看到一幅美国总统的低精度画像,这里我用BASIC语言把这幅画像献给大家,看看你能不能猜出他是谁?刚开始你可能还看不出是谁,那就离显示器远一点,再远一点,是不是有点像……
  CLS:SCREEN 0,nonzero:DIM m(5)
  PRINT TAB(27):"Who is he?"
  m(0)=32:m(1)=176:m(2)=177:m(3)=178:m(4)=219:m(5)=219
  FOR i=1 TO 18:READ st,ch$:LOCATE 5+i,20+st
   FOR j=1 TO LEN(ch$):a=VAL(MID$(ch$,j,1))
     IF a=5 THEN COLOR 15
     PRINT CHR$(m(a));CHR$(m(a));:COLOR 7
   NEXT j:PRINT
  NEXT i:END
  DATA 7,"425",5,"255555",4,"45325555",3,"355000055",3,"5530100435"
  DATA 2,"5541001105",2,"45551453355",2,"50552351553",3,"305111013"
  DATA 3,"505511225",3,"155522055",4,"35512355",2,"1145555355"
  DATA 2,"1151555552",2,"1555045522",1,"15555555545"
  DATA 1,"4555555555555",1,"45555555555555"
  答案:亚伯拉罕·林肯