2023年12月27日
使用pack函数输出数组中满足条件元素的索引+数组索引
摘要： program main_test implicit none real, dimension(5) :: arr1, arr2 LOGICAL, dimension(5) :: ad, ab, ac, tot INTEGER , dimension(:), allocatable:: arr3 I 阅读全文
posted @ 2023-12-27 11:43 搬砖的鹏 阅读(8) 评论(0) 推荐(0) 编辑