?? ex0708.f90
字號:
program ex0708
implicit none
integer, parameter :: row = 2
integer, parameter :: col = 2
integer :: ma(row, col) = 1
integer :: mb(row, col) = 4
integer :: mc(row, col)
integer :: i,j
mc = ma + mb ! 一行程序碼就可以做矩陣相加
write(*,"(I3,I3,/,I3,I3)") ((mc(i,j), i=1,2),j=1,2)
stop
end
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -