如何让π和16在同一条直线上？

Question

所以，我正在我的 TI-84 Plus 上编写一个程序来计算圆的面积。我希望它显示近似答案和确切答案，但我无法让后者工作。代码是这样的（我意识到它不是很有效）：

Prompt R
ClrHome
(πR²)→A
(R²)→B
round(B,2)→B
Disp "A="
Disp ""
Disp "APPROXIMATION:"
Disp A
Disp "EXACT:"
Disp "π",B
Disp "PRESS ENTER"
Pause

但是显示是这样的（当半径为4时）：

A=

APPROXIMATION:
               50.27
EXACT:
π
               16
PRESS ENTER

我想知道如何使 π 和 16（在这种情况下）在同一行上，使 π 在 16 之前，并使其适用于所有数字。我尝试使用 Output( 命令，但如果 B 超过 2 位数，它会转到下一行。谢谢！

Answer 1

也许使用 Output(X,Y,"π") 和 Output(X,Y-3,B) 我会这样做：

    :Prompt R
    :ClrHome
    :(πR²)→A
    :(R²)→B
    :log(B)→C
    :round(B,2)→B
    :Output(1,1,"A")
    :Output(3,1,"APPROXIMATION:")
    :Output(3,16,A)
    :Output(5,1,"EXACT:")
    :Output(5,8,B)
    :Output(5,11+C,"π")
    :Output(7,1,"PRESS ENTER")
    :Pause

基本上，一旦计算完成，在这个prgm文本中，程序将使用log(B)→C来计算将π向右移动多少空间。之后，它将在文本的第一行输出 A，在主屏幕网格的第三行（用于输出）输出近似值，在主屏幕网格的第五行以 π 表示的精确近似值（用于输出）。

希望对您有所帮助！

Answer 2

就个人而言，我倾向于使用 Output( 来显示文本，但还有另外两种方法可以做到这一点。

您可以使用 Text(（在 Draw 菜单下）将文本写入图形屏幕。为此，您需要确保所有图形都关闭，轴关闭，网格关闭（据我所知，网格仅适用于TI84 +C白银版）。
您可以使用 Disp 来显示包含所需值的字符串。为此，您需要将 B 的值转换为字符串。有几种方法可以做到这一点，其中一种方法已发布 here.

如何让π和16在同一条直线上？

How to make the π and 16 be on the same line?

ti-basic