포트란의 같은 행에 인쇄하십시오.

Question

if (mod(n,2) == 0) then 
     write(stdout, *) "Even" 
    else 
     write(stdout, *) "Odd " 
    end if 

Even Odd Even Odd을 인쇄하고 싶습니다. 왜이 경우 $ 설명자를 사용할 수 없습니까?

Answer 1

코드에 $ 설명자가 없습니다!

아니요, 표준 포트란에는 $ 설명자가 없습니다. 일부 컴파일러에서는 확장자로 사용하고 다른 컴파일러에서는 사용하지 않습니다. 휴대용 프로그램을 원한다면 사용하지 마십시오.

Fortran 90 표준 준수 방법은 advance='no'과 함께 진행되지 않는 O/O를 사용합니다. 목록 지향 입력이 아닌 형식이 필요합니다.

write(stdout, some_format, advance='no') "Even" 

some_format

는 '(a)' 또는 '(g0)' 또는 적용 무엇이든 할 수있다.

또한 경고의 경우 http://www.cs.rpi.edu/~szymansk/OOF90/bugs.html#3 (요약 : 여전히 레코드 길이 제한이있을 수 있음)을 참조하십시오.