[求助] 十进制数字转为二进制字符

159 帖子	2 主题	1 精华

大师

Vim

F 币: 961 元
贡献: 469 点

发消息

楼主

发表于 2023-9-9 09:23:45 | 显示全部楼层

[Fortran] 纯文本查看 复制代码

program main
  implicit none
  integer :: decimal_number
  character(len=32) :: binary_string
  read(*,*)decimal_number
  write(binary_string,"(b32.32)")decimal_number
  write(*,*)binary_string
end program main

空位全都补0的写法，write的用法叫做内部文件读写

回复支持反对

使用道具举报

返回列表发新帖