2017-12-10から1日間の記事一覧
program sele implicit none integer,parameter::max=100000 integer::i,j,n=0,status=0 integer:: a(max),b(max),d !Here, open two files and named each of them like 10 and 20. open(10,file="unsort.txt");open(20,file="sort.txt") !Do loop until th…