如何计算Perl中两点之间的距离?

use*_*385 0 math perl

我需要帮助我的初级计算机科学课作业.我完全迷失了!

我需要在Perl中编写一个程序,用我的教授用给定的公式计算2个点之间的距离和三个值(x,y,z).该计划必须做到以下几点:

  • 提示'c'继续'q'退出
  • 单独提示第一组的x,y,z坐标
  • 单独提示第二组的x,y,z坐标
  • 计算两组之间的距离,然后显示该值并退出.

这是我到目前为止所做的:

Psuedo代码概述了上述内容

如果那么过程概述c继续和q退出部分找到一个用于计算距离的sqrt方程

而不是获取代码,我真的在寻找从这里开始的提示.我是从定义变量开始的吗?第一个轮廓上的任何提示或方向都将非常感谢!;)

Pau*_*bel 5

你有三个主要问题,一个是琐碎的问题.

如果我这样做,我会做以下事情:

1)确保我的安装工作正常,没有什么比认为它的代码问题更糟糕了,并发现你的安装已经破坏.你能跑出你好世界吗?(这应该是微不足道的.)

print "Hello World\n";
Run Code Online (Sandbox Code Playgroud)

2)试验数学,使距离计算有效.从硬编码值开始:

$x = 1;
$y = 2;
$z = 3;
print (($x + $y ) / 3); #whatever
Run Code Online (Sandbox Code Playgroud)

3)弄清楚如何读取输入.您可能想看一下learn perl网站

4)把它放在一起.

  • 嗯,带有"无论什么"评论的`print`没有按照你的想法做到:运行时会发出警告以查看问题.你将`print`的返回值除以3,然后丢弃该结果. (4认同)