※ 引述《grasteven (定心N yN N )》之銘言：
: ※ 引述《grasteven (定心N yN N )》之銘言：
: : program ex1
: : real::a,b,c,d,e,f,g
: : write(*,*)'請輸入底邊a'
: : read(*,*)a
: : write(*,*)'請輸入高b'
: : read(*,*)b
: : c=(a*a+b*b)**(1./2.)
: : write(*,*)'斜邊=',c
: : end program
: 這是自己寫的
: program ex2
: real::a,b,c,d,e,f,g,h
: write(*,*)'請輸入梯形的上底a'
: read(*,*)a
: write(*,*)'請輸入梯形的下底b'
: read(*,*)b
: write(*,*)'請輸入梯形的高c'
: read(*,*)c
: d=(a+b)*c/2
: write(*,*)'梯形的面積=',d
: end program
2/3=0
2./3.=0.66666666666666666666666
4/2=2
4./2.=2.
5/2=2
5./2.=2.5
--
都是鮑魚啦....
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 140.136.202.102