思享工具箱

Basic语言开发笔记：Basic语言介绍、环境搭建、基本语法示例与程序实例

摘要：
Basic是一种比VB更古老的语言。Basic Basic是为初学者设计的编程语言，意思是“初学者的通用符号指令代码”。BASIC是一种文字编程语言，在编写后无需编译、链接和其他过程即可执行，但如果需要单独执行，仍需要将其创建为执行文件。1964年，BASIC语言正式发布。第一个BASIC程序由BASIC编译器编译，并于1964年5月1日凌晨4:00成功运行。示例1：PRINT“12345”“54321”STOPPRINT“Helloworld”转子语句示例1：目前，与GOTO语句DATA1,2,3,4READA，B100PR没有区别

若该文为原创文章，未经允许不得转载
原博主博客地址：https://blog.csdn.net/qq21497936
原博主博客导航：https://blog.csdn.net/qq21497936/article/details/102478062
本文章博客地址：https://blog.csdn.net/qq21497936/article/details/106850097
各位读者，知识无穷而人力有穷，要么改需求，要么找专业人士，要么自己研究

红胖子(红模仿)的博文大全：开发技术集合（包含Qt实用技术、树莓派、三维、OpenCV、OpenGL、ffmpeg、OSG、单片机、软硬结合等等）持续更新中…（点击传送门）

其他（编程相关）
 
前言

  红胖子来也！！！
  Basic语言是很老的语言了，比VB（Visual Basic还老）。

 
BASIC

  BASIC（Beginners’ All-purpose Symbolic Instruction Code，又译培基），意思就是“初学者通用符号指令代码”，是一种设计给初学者使用的程序设计语言。
  在这里插入图片描述
  BASIC是一种直译式的编程语言，在完成编写后不须经由编译及连结等手续即可执行，但如果需要单独执行时仍然需要将其建立成执行档。
  BASIC是由达特茅斯学院院长、匈牙利人约翰·凯梅尼（John G. Kemeny）与数学系教师托马斯·卡茨（Thomas E. Kurtz）共同研制出来的。1964年BASIC语言正式发布。第一个BASIC程序在1964年5月1日早上4时，由BASIC编译程序进行编译后成功运行。1975年，比尔·盖茨把它移植到PC上。

 
编译环境搭建

安装编译器

  安装FreeBasic，主要用他来编译，如下图：
   在这里插入图片描述
  安装完后，打开命令行：
  在这里插入图片描述
  跳转到开发目录即可，

安装编辑环境

  安装PowerBasic，主要用他的编辑器
  在这里插入图片描述
  打开编辑器：
  在这里插入图片描述

下载地址

  CSDN下载地址：https://download.csdn.net/download/qq21497936/12538533
  软件打包下载地址：QQ群1047134658（点击“文件”搜索“Basic”，群内与博文同步更新所有可开源的源码模板）

编译器编译时错误解决

  编译时报错，如下图：
  在这里插入图片描述
  主要是因为使用了未定义的变量，其实是语言规则不同，因为使用qb语言，所以需要加上参数“-lang qb”，即可，如下图：
  在这里插入图片描述

运行环境

  直接打开dos，跳转到目录，fbc命令会生成对应的exe直接运行即可。

 
基本语句

打印（PRINT）语句

示例1

PRINT "12345"
PRINT "Hello world"

在这里插入图片描述
在这里插入图片描述

示例2

PRINT "12345";"54321"
PRINT "Hello world"

在这里插入图片描述
在这里插入图片描述

示例3

PRINT "12345" "54321"
PRINT "Hello world"

在这里插入图片描述
在这里插入图片描述

TAB（TAB）语句

  PRINT语句中使用TAB语句就类似于使用TAB键。
  TAB(1)和TAB(2)没有起到作用

示例1

PRINT "123456789ANCDEF"
PRINT 1;TAB(1);2
PRINT 1;TAB(2);3
PRINT 1;TAB(3);4
PRINT 1;TAB(4);5
PRINT 1;TAB(5);6
PRINT TAB(3);"Y";TAB(9);"Z"
END

在这里插入图片描述
在这里插入图片描述

置数（DATA）语句

  配合读数语句使用，称读数据（READ/DATA）语句。
  请参照“读取READ语句”

读取（READ）语句

  READ是读取data存储的数据，并不是我们习惯所认为的从屏幕上输入，同时变量要先定义才能使用。

示例1：读取数字

  （字符串必须是$符号结尾）

DATA "12aaa345","11bbb11"
PRINT "READ ONE, SHOULD BE 12aaa345"
READ S
PRINT S
PRINT "READ ONE, SHOULD BE 11bbb11"
READ S
PRINT S
END

在这里插入图片描述
在这里插入图片描述

示例2：读取字符串

DATA "12aaa345","11bbb11"
PRINT "READ ONE, SHOULD BE 12aaa345"
READ S$
PRINT S$
PRINT "READ ONE, SHOULD BE 11bbb11"
READ S$
PRINT S$
END

在这里插入图片描述
在这里插入图片描述

示例2：先读取后置入数字

PRINT "READ ONE, SHOULD BE 12345"
READ S
PRINT S
PRINT "READ ONE, SHOULD BE 11111"
READ S
PRINT S
SLEEP
DATA "12345","1111"
END

在这里插入图片描述
在这里插入图片描述

示例3：读取数字

DIM D1 AS INTEGER
DATA 20,10
PRINT "READ ONE, SHOULD BE 20"
READ D1
PRINT D1
PRINT "READ ONE, SHOULD BE 10"
READ D1
PRINT D1
SLEEP
END

在这里插入图片描述
在这里插入图片描述

示例4：读取数字时，同时使用“：”进行其他操作

DATA 10,100,1000
READ T1,T2:T3=T1+T2
PRINT T1
PRINT T2
PRINT T3
READ T3
PRINT T3
END

在这里插入图片描述
在这里插入图片描述

示例5：读取字符串

DATA "aaa"
READ A$
PRINT A$
END

在这里插入图片描述
在这里插入图片描述

赋值（LET）语句

  （注意：字符串默认结尾为$，否则认为是整数）

示例1

LET A$="12345"
PRINT A$
LET A=10
PRINT A
PRINT A*10
END

在这里插入图片描述
在这里插入图片描述

键盘输入（INPUT）语句

  （注意，经测试，变量定义为A$，有金钱符号结尾，才被认为是字符串，否则认为是数字，而且输入错误，数字则默认为0）

示例1

PRINT "PLEASE INPUT A NUM:"
INPUT A
PRINT "YOU INPUT NUM:";A
END

在这里插入图片描述

示例2

PRINT "PLEASE INPUT A NUM:"
INPUT A$
PRINT "YOU INPUT NUM:";A$
END

在这里插入图片描述

恢复数据区（RESTORE）语句

示例1

DATA 1,2,3,4
READ A,B
PRINT A
PRINT B
RESTORE
READ A,B
PRINT A
PRINT B
END

在这里插入图片描述
在这里插入图片描述

无条件转移（GOTO）语句

  （注意：之前的程序，每一行之前没有数字标签，使用GOTO加上去）

示例1

DATA 1,2,3,4
READ A,B
100
PRINT A
PRINT B
SLEEP
PRINT "GOTO AGAIN"
GOTO 100
END

在这里插入图片描述
在这里插入图片描述

条件转移（IF ~ THEN或IF ~ GOTO）语句

示例1

DATA 1,2,10
READ A,B,C
100
PRINT A*B: A=A*B
IF A<C THEN GOTO 100
PRINT A;">";C
END

在这里插入图片描述
在这里插入图片描述

注释（REM）语句

示例1

DATA 1,2,10
READ A,B,C
100
REM "123456"
PRINT A*B: A=A*B
IF A<C THEN GOTO 100
PRINT A;">";C
END

在这里插入图片描述

循环终了（NEXT）语句

  与循环说明语句合成循环（FOR~NEXT）语句。
  请参照“循环说明（FOR）语句”

循环说明（FOR）语句

示例1

INPUT N
FOR I=0 TO N
    A=A+I
    PRINT "+";I;"=";A
NEXT I
PRINT A
END

在这里插入图片描述
在这里插入图片描述

暂停（STOP）语句

  stop是直接退出程序了。

示例1

PRINT "12345" "54321"
STOP
PRINT "Hello world"

在这里插入图片描述
在这里插入图片描述

转子（GOSUB）语句

示例1：目前未发现与GOTO语句的区别

DATA 1,2,3,4
READ A,B
100
PRINT A
PRINT B
SLEEP
PRINT "GOTO AGAIN"
GOSUB 100
END

在这里插入图片描述
在这里插入图片描述

返回（RETURN）语句

  配合转子语句使用，调用子程序。

数组说明（DIM）语句

  定义数组，定义的数组下标从1开始。

示例1

DIM A(6)
DATA 1,2,3,4,5,6
READ A(1),A(2),A(3),A(4),A(5),A(6)
PRINT "A(0),A(1),A(2),A(3),A(4),A(5),A(6)"
PRINT A(0),A(1),A(2),A(3),A(4),A(5),A(6)
PRINT "A(1),A(2),A(3),A(4),A(5),A(6)"
PRINT A(1),A(2),A(3),A(4),A(5),A(6)
PRINT "A(0);A(1);A(2);A(3);A(4);A(5);A(6)"
PRINT A(0);A(1);A(2);A(3);A(4);A(5);A(6)
PRINT "A(1);A(2);A(3);A(4);A(5);A(6)"
PRINT A(1);A(2);A(3);A(4);A(5);A(6)
END

在这里插入图片描述
在这里插入图片描述

结束（END）语句

  结束程序。

 
程序实例

预读入加法程序

DATA 10,20
READ A,B
PRINT A;"+";B;"=";A+B

在这里插入图片描述
在这里插入图片描述

定义数组并赋值

DATA 10,20,30,40
DIM D$(4)
READ D$(1),D$(2),D$(3),D$(4)
PRINT D$(1),D$(2),D$(3),D$(4)
END

在这里插入图片描述
在这里插入图片描述

定义数组并循环赋值

  （注意：数组定义，数组下标序号从1开始，目前普遍从0开始）

DATA 6
DATA 0.01,0.01,0.01,0.02,0.02,0.2,0.03,0.03,0.03,0.04,0.04,0.04,0.05,0.05,0.05,6.1,6.2,6.3
READ M0
DIM T0(M0+1),D0(M0),J0(M0)
FOR M=1 TO M0
    READ T0(M),D0(M),J0(M)
NEXT M

FOR M=1 TO M0
    PRINT "M=";M;",";T0(M);",";D0(M);",";J0(M)
NEXT M
END

在这里插入图片描述
在这里插入图片描述

 

原博主博客地址：https://blog.csdn.net/qq21497936
原博主博客导航：https://blog.csdn.net/qq21497936/article/details/102478062
本文章博客地址：https://blog.csdn.net/qq21497936/article/details/106850097

浏览：491 | 发布日期：

免责声明：文章转载自《Basic语言开发笔记：Basic语言介绍、环境搭建、基本语法示例与程序实例》仅用于学习参考。如对内容有疑问，请及时联系本站处理。

上篇Entity Framework Code First Migrations--EF 的数据迁移[Oracle报错]TNS-12535: TNS:operation timed out、TNS-00505: Operation timed out下篇

宿迁高防，2C2G15M，22元/月；香港BGP，2C5G5M，25元/月 雨云优惠码：MjYwNzM=

随便看看

docker运行mysql容器自动停止的问题解救方案如下

3.此时，通过输入dockers可以发现MySQL容器正在正常运行：...

iview中modal如何修改标题颜色

modal默认设置transfer属性为true，然后整个弹窗就在body的下一层，所以样式修改失败，直接设置为false就可以修改样式了修改标题颜色，当然设置transfer为false后也可以修改modal中的其他样式：.ivu-modal-header-inner{color:#ba9759;}...

MIPS学习笔记（一）

本章涉及MIPS变量声明、数据输入和输出、地址获取、分支跳转语句，基本上对应于任何高级语言的最基本操作。该信息的确切形式因汇编程序而异。在MIPS程序集中，标签是后跟冒号的符号名称。）syscall程序的结尾与C类似，可以调用exit函数来停止程序的执行。停止MIPS程序的一种方法是使用类似于在C中调用exit的方法。MIPS中有一个移动指令，它将一个寄存器...

凤凰系统(Phoenix OS)PC版安装，电脑上体验功能丰富的安卓系统

Tid=9074&fid=12安装前准备下载最新的PhoenixOSIO安装映像，并将其刻录到USB闪存驱动器；如果使用Windows操作系统，建议使用UltraISO刻录。下载地址：http://www.phoenixos.com/download_x86开始安装。1.重新启动机器，从启动选项中选择USB闪存磁盘启动，然后选择“Installati...

DB2字符函数简介及使用

Param2可以是编码单元16-16位UTF-16编码，也就是说，字符串表示为16位UTF-18编码字符串。Codeunits32-32位UTF-32编码，即字符串表示为32位UTF 32编码字符串。请注意，定义为FORBITDATA的字符串不能转换为图形字符。如果length＜length，则来自的原始字符串短于结果中的长度。...

PHP 垃圾回收机制(转)

GC进程通常从每个会话开始运行。GC的目的是在会话文件过期__destruct/unset__destruct（）析构函数后自动销毁和删除它们。PHP将使用全局变量session.gc_Probability和session.gc_advisor的值session.gc_Probability=1，...

最新文章

随机推荐

思享工具箱导航