2017-11-04から1日間の記事一覧
program isbnimplicit nonelogical judgecharacter(len=10)::ainteger::i,b,h,s=0,t,j,y,q,lprint*, 'Type in a 10-digit ISBN marked with "?" for the missing digit.'read*, ajudge = .false. !This judge will be used to check whether including "?" o…