2 Print "What is your name"
input nameperson$
Print "What is your Dad's name"
input ageperson$
Print "Your Name is ";nameperson$;" ";ageperson$
GOTO 2
为什么这段代码在 BASIC 256 中不起作用？我已经在QB64中尝试过并且有效。
我是Python的新手,没有QBasic的经验.我在Python中运行一个模拟,它提出了理论上错误的值.然后我在QBasic中运行它并提出了理论预测值.
以下是测试用例.我只计算概率P(0.9 <%Y <= 1.8),因此计数必须落在这些值内.1-random.random()仅适用于那种情况,当我尝试在所有情况下使用它时,它们仍然提出了错误的值.这是理论结果,你可以看到它是如何不同的:
y~u(0,1)= 0.575
y~exp(2)= 0.3371
x1~u(0,1)x2~u(0,2)= 0.4475
P(y = 0.25)= 0.8 P(y = 1.5)= 0.2 = 0.32
在Python中,模拟代码是:
def test():
x1,x2,c = 0.0,0.0,0.0
for i in range(10000):
if random.random()< 0.8:
x1 += 0.25
else:
x2 += 1.5
y = x1 + x2
if y>0.9 and y<=1.8:
c = c + 1
return x1,x2,c
print "test: ",test()
def sim(a,b):
#pyab1 = sum([a for a in a if a>0.9 and a<=1.8])/10000
#pyab2 = sum([b for b in b …我刚刚使用这种编程语言创建了一个文本到语音转换器.
代码是,
DO
CLS
PRINT "This is the program built by Adhikari Newtorks Team Using QBASIC..........."
PRINT "This is a text to speech converter.."
PRINT
PRINT
INPUT "Enter the word to pronounce: ", speak$
OPEN "sound.vbs" FOR OUTPUT AS #1
PRINT #1, "dim speechobject"
PRINT #1, "set speechobject=createobject ("; CHR$(34); "sapi.spvoice"; CHR$(34); ")"
PRINT #1, "speechobject.speak"; CHR$(34); speak$; CHR$(34)
CLOSE #1
SHELL "sound.vbs"
KILL "sound.vbs"
LOOP
你知道,我在这里使用这种语言编写了一个可视化的基本代码.我的主要困惑是,我可以说这个程序是使用QBASIC编程语言构建的,还是应该称之为Visual Basic程序？
我正在尝试创建一个代码，生成 10-30 范围内的随机数，但确保没有重复的数字。NumArray(Count) = Count当我运行代码时，它显示“下标超出范围” 。
'Make an array of completely sorted numbers
FOR Count = 10 TO 30
NumArray(Count) = Count
NEXT Count
RANDOMIZE TIMER
FOR Count = 10 TO 30
Number = (RND * (31 - Count)) + 10
PRINT #1, NumArray(Number)
FOR Counter = Number TO 30 - Count
NumArray(Counter) = NumArray(Counter + 1)
NEXT Counter
NEXT Count
这实际上不是我的代码。为我的作业复制并粘贴。