Program Baidu_By_Thlws
Implicit None
Integer , Parameter :: NUM_OF_ROWS = 10
Integer i , j
Do i = 1 , NUM_OF_ROWS
Do j = 1 , i
Write(*,'(a1)',advance='NO') 'M'
End Do
write(*,*)
End Do
End Program Baidu_By_Thlws
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024