fortran怎么写平方

在Fortran编程语言中，计算一个数的平方可以通过几种不同的方式实现。一种简单的方式是使用乘法操作符，将一个数与自身相乘。以下是一个简单的例子：

program square_example
    implicit none
    real :: x, square_of_x

    x = 5.0
    square_of_x = x * x
    print *, 'The square of', x, 'is', square_of_x
end program square_example

在上面的程序中，我们声明了一个实型变量`x`和另一个实型变量`square_of_x`来存储`x`的平方。我们将`x`乘以自身，然后将结果赋值给`square_of_x`。最后，我们使用`print`语句输出结果。

Fortran也提供了一个内置的函数`**`来计算指数运算，其中包括平方。使用这个函数，代码可以写成这样：

program square_example
    implicit none
    real :: x, square_of_x

    x = 5.0
    square_of_x = x ** 2
    print *, 'The square of', x, 'is', square_of_x
end program square_example

在这段代码中，`x ** 2`表示计算`x`的平方。