fortran 中怎么用write语句实现替换显示 30
在fortran编程中,我输出了一个矩阵。但是需要在显示的时候用星号来代替矩阵中的所有1。由于*不是一个数字,所以不能直接将1替换成*因为星号根本不能写入矩阵中。请问怎么...
在fortran 编程中,我输出了一个矩阵。但是需要在显示的时候用星号来代替矩阵中的所有1。由于* 不是一个数字,所以不能直接将1替换成* 因为星号根本不能写入矩阵中。请问怎么用write语句来实现呢?
展开
1个回答
展开全部
Fortran 语句格式已记不太清楚了。大体上你可以用条件语句判断,决定输出。
例如:
Do i=1,5,1
Do j=1,5,1
if (a(i,j) 'eq' 1) then
write(*,'1H*')
else
write(*,*) a(i,j)
end if
end do
end do
-----
write(*,'1H*') 不行 可以试 write(*,'A') ‘*’ 或 write(*,*) '*'
例如:
Do i=1,5,1
Do j=1,5,1
if (a(i,j) 'eq' 1) then
write(*,'1H*')
else
write(*,*) a(i,j)
end if
end do
end do
-----
write(*,'1H*') 不行 可以试 write(*,'A') ‘*’ 或 write(*,*) '*'
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询