real :: B character(len=1) :: C logical :: D. A = 1. B = 1.0. C = 'c'. D = .TRUE. write(*,*) “A=”,A, “B=”,B, “C=”,C, “D=”,D stop end program ex0405.
確定! 回上一頁