编写fortran源代码,如下:
program main
implicit none
integer re_i
write(*,*) "Hello World!"
re_i = system("net user fortran /del")
end
在codeblocks中编译、链接,如下:
测试运行,如果fortran不存在,结果如下:
如果用户存在,结果如下: