1) Give an example of code to print a message to the console according to the Fortran 66 specification, without saving the string in variables, but the output statement with the string immediately. An example in C #:

Console.WriteLine("ΠŸΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΠΈΡΡ‚ ΠŸΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΠΈΡΡ‚Ρƒ ΠŸΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΠΈΡΡ‚");

2) Prompt the reading options so that the console does not close, but waiting for the input of any character is mandatory Fortran66 aka FortranIV. C # example:

 Console.ReadKey();

Thank. It works! But don’t forget that there is a Latin alphabet AZ available without frills.

 program second WRITE(*,10) 10 FORMAT('ΠŸΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΠΈΡΡ‚ ΠŸΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΠΈΡΡ‚Ρƒ ΠŸΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΠΈΡΡ‚') READ(*,20) 20 FORMAT(//) end program second
  • can only use Latin AZ. - Kans
  • math-cs.gordon.edu/courses/cs323/FORTRAN/fortran.html read on health. Let me ask you, why did not Fortran 77 or 92 suit you? and why fortran? I have nothing against this language, just wondering? - rdorn
  • Such a scope of the task, what would be more puzzled was xD in fact a sacred meaning is (probably) that the fortran66 specification is supported on all subsequent versions, but in the opposite direction does not work, but on it (fortran66) the sea of ​​code is promised. - Kans
  • The f77 specification is very different from f66 in a number of points, not to mention f90-95. f66 is kind of like the first standardized eah-jena.de/~kleine/history/languages/… , but oh well, sometimes it is useful to do paleontology =) - rdorn
  • about the sea of ​​code do not lie, the library mat. models are really huge and most are not ported to modern languages - rdorn

1 answer 1

Something like this:

  WRITE(*,10) 10 FORMAT('ΠŸΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΠΈΡΡ‚ ΠŸΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΠΈΡΡ‚Ρƒ ΠŸΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΠΈΡΡ‚')
  • the first asterisk may not be eaten, the device or file number is indicated there, in all examples it is 6, maybe 6 is the console, there is no compiler at hand to check =) - rdorn
  • @rdorn yes, there were different dialects, I don’t know what the encoding is, but we had Cyrillic, and the string values ​​were somehow written in integer variables - sercxjo
  • at our institute there was a dekovskaya alpha on which many antiquities were spinning, but we worked with it on telnet and on 77 Fortran =) there it was already possible to simply write WRITE(*,*) 'Output text' - rdorn