code. compile. run. debug. share.
Program Init
integer::a (5) = [1, 2, 3, 4, 5] ! 配列構成子の代替形式
integer::b (5) = (/1, 2, 3, 4, 5/) ! 配列構成子スカラ式
integer::c (5) = (/(i, i=1, 5)/) ! 配列構成子DO形反復
integer::x (5) = 1 ! 配列要素を全て1に
Print *, a
Print *, b
Print *, c
Print *, x
x = a ! 配列変数に配列変数を代入
Print *, x
Print *, x * 2 ! 配列変数xの要素全てに _ * 2
Print *, 2 ** x ! 配列変数xの要素全てに 2 ** _
end program
Compiling Program...
Standard Input:
Interactive Console
Text
Program is not being debugged. Click "Debug" button to start program in debug mode.
| # | Function | File:Line |
|---|
| Variable | Value |
|---|
| Register | Value |
|---|
| Expression | Value |
|---|
| # | Description |
|---|