Re: [問題] 計算機概論強者..關於符點數和fortran程式
※ 引述《cchs111113 (0(一.一)0)》之銘言：
: ※ [本文轉錄自 Wanted 看板]
: 作者: cchs111113 (0(一.一)0) 看板: Wanted
: 標題: [問題] 計算機概論強者..關於符點數和fortran程式
: 時間: Sun Nov 2 16:56:04 2008
: OH~計概要了我的命
: 有兩題需要求救一下
: 1.試將-17.25表示為32位元的符點數
1100000110001010000.......................(尾巴補0到滿32位)
: 2.Fortran程式撰寫：試寫一程式，將1至500之間所有7的倍數之總和算出後，印出其結果。
: 對於強的人應該蠻簡單的吧
: 需要鄉民們的幫忙!!
: 萬事拜託啦!!!
program copyfromptt
implicit none
integer i,sum
sum = 0
do i=1,2147483647
if(i.GE.001)then
if(i.LE.500)then
if(mod(i,7).EQ.0)then
sum=10*sum
sum=sum+i*100
sum=100*sum/1000
sum=-4500*i/500+sum
endif
endif
endif
enddo
print *, "ans=",sum
end program
第2題有點難
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 116.59.131.124
※ 編輯: latinboy 來自: 116.59.131.124 (11/02 17:59)
推
11/02 18:09, , 1F
11/02 18:09, 1F
推
11/02 20:58, , 2F
11/02 20:58, 2F
推
11/02 22:11, , 3F
11/02 22:11, 3F
推
11/02 22:56, , 4F
11/02 22:56, 4F
推
11/03 22:53, , 5F
11/03 22:53, 5F
討論串 (同標題文章)
Fortran 近期熱門文章
PTT數位生活區 即時熱門文章
