CAD in Civil Engineering - Baustatik-Info-Server

Page 28 Computer Languages for Engineering - SS 132.7.3 Formatting, FORMAT StatementIf data should be formatted, we can use the format statement or we can use the parameter of the formatstatement as string as parameter 2 of the write statement. The general form of an output format is[m]Tw[.n].1. Format Type T• I, integer format.• F, float format with fixed decimal point.• E, float format with exponential representation.• A, text format, the with of the format is optional.• X, output of spaces• /, a new line, linebreak2. repeat factor m3. width of the output field w4. number of significant digits n within float formatting.If n is used in integer formattings, the leading blanks are filled with zeros.Formats can also be iterated by iteration factors. If more complex formats should be iterated, the formatblock must be bracketed by round parentheses. Within the following example the output of 3 variablevalues a, b and c should be written. We use one format with an iteration of 3. The format starts with2 blanks (2x). Then a text will be written, (a format) and at the end the value of the variable shouldbe written using a fixed float format (f). The output should have a width of 10 with 2 digits after thedecimal point.1 c W| 1 2 3 4 5 6 72 c234567890123456789012345678901234567890123456789012345678901234567890123 write(*,8000) ’a=’,a,’b=’,b,’c=’,c4 8000 format(3(2x,a,f10.2))2.7.4 Read from Keyboard or FileThe read statement is similar to the write statement. We simply exchange source and destination.The first parameter of the read statement passes the io channel. The second parameter passes the inputformat. If a * is given, the format is free. That is, the input information units are separated by blanks(white spaces). Optionally a read io error can be handled by the iostat parameter.1 READ (, [,]) E. Baeck