回答編集履歴
1
修正
test
CHANGED
|
@@ -4,7 +4,9 @@
|
|
|
4
4
|
|
|
5
5
|
implicit none
|
|
6
6
|
|
|
7
|
+
integer :: i, j
|
|
8
|
+
|
|
7
|
-
real(8) :: a, b, pi
|
|
9
|
+
real(8) :: a, b, pi, x, y
|
|
8
10
|
|
|
9
11
|
pi = 3.1415926
|
|
10
12
|
|