我决定实现一个程序,可以在TI-Basic中找到任意两个数字(包括非整数)的GCD。我在Java中使用它很好,所以我知道它有效。它在TI-Basic中运行得很好,但与内置的gcd(
函数相比,它非常缓慢; gcd(
函数似乎以毫秒为单位得到结果,我的可能需要几秒钟。 为什么TI-Basic比预定义的计算器功能慢得多?
以下是TI-Basic中的程序代码,供您检查:
PROGRAM:GCD
:ClrHome
:Disp "Greatest Common"," Divisor"," ---"
:Input "First number? ",X
:Input "Second number? ",Y
:
:X→I
:Y→J
:
:If (I≠int(I) or J≠int(J))
:Then
:ClrHome
:Disp "Non-integer","inputs may be","innacurate!",""
:End
:If (I=1 or J=1)
:Then
:1→I
:1→J
:Goto Z
:End
:For(C,0,2^8)
:If I=J
:Goto Z
:
:If I>J
:I-J→I
:
:If J>I
:J-I→J
:
:End
:
:Disp "This is a hard","one! Thinking","harder..."
:
:For(C,0,2^15)
:If (I=J)
:Goto Z
:While (I>J)
:I-J→I
:C+1→C
:End
:While (J>I)
:J-I→J
:C+1→C
:End
:End
:
:Disp "TIMED OUT!","Either:",J,"or"
:Pause
:
:Lbl Z
:ClrHome
:Disp "GCD of",X,"and",Y,"is",I
免责声明:这是我看TI-84并在此输入的结果。有些拼写错误可能会在其中,尽管我尽力保持不变
对于那些可能不知道这意味着什么的人,下面提供了伪代码:
program gcd()
{
Console.clear();
Console.writeln("Greatest Common");
Console.writeln(" Divisor");
Console.writeln(" ---");
float X = Console.readFloat("First Number? ");
float Y = Console.readFloat("Second number? ");
float I = X;
float J = Y;
if (I != (int)I || J != (int)J)
{
Console.clear();
Console.writeln("Non-integer");
Console.writeln("inputs may be");
Console.writeln("inaccurate!");
Console.writeln("");
}
if (I == 1 or J == 1)
{
I = 1;
J = 1;
goto Z;
}
for(int C = 0, limit = Math.pow(2,8); C < limit; C++)
{
if (I == J)
goto Z;
if (I > J)
I = I - J;
if (J > I)
J = J - I;
}
Console.writeln("This is a hard");
Console.writeln("one! Thinking");
Console.writeln("harder...");
for(int C = 0, limit = Math.pow(2,15); C < limit; C++)
{
if (I == J)
goto z;
while (I > J)
{
I = I - J;
C++;
}
while (J>I)
{
J = J-I;
C++;
}
}
Console.writeln("TIMED OUT!");
Console.writeln("Either:");
Console.writeln(J);
Console.writeln("or");
Console.pause();
Z:
Console.clear();
Console.writeln("GCD of");
Console.writeln(X);
Console.writeln("and");
Console.writeln(Y);
Console.writeln("is");
Console.writeln(I);
}
答案 0 :(得分:10)
这很慢,因为它是一种解释性语言 - Disadvantages of interpreted languages.
基本上这会影响抓取用户输入,以及在屏幕上显示图形。
答案 1 :(得分:2)
您可以修复很多代码,例如不使用Goto,在行尾保留括号,不使用ClrHome等。 更多信息: https://en.wikibooks.org/wiki/TI-Basic_Z80_Programming/Tips,_Tricks_and_Optimizations
答案 2 :(得分:1)
它变慢的另一个原因是因为clrHome
,我在使用它们时已经意识到,clr-home
花了一点时间才能完成,也许要花半秒钟,至少是在Ti-83上另外,通常disp
和input
不会花费很多,也可以使用prompt fist number','second number'