| 1 | PROGRAM GAUSS (INPUT, OUTPUT); |
| 2 | |
| 3 | VAR I, J, K, L, M, N: INTEGER; |
| 4 | Q: REAL; |
| 5 | A: ARRAY[1..9, 1..10] OF REAL; |
| 6 | |
| 7 | BEGIN |
| 8 | READ(N); WRITELN(N); |
| 9 | FOR I := 1 TO N DO |
| 10 | BEGIN |
| 11 | FOR J := 1 TO N+1 DO BEGIN READ(Q); WRITE(Q:6:2) END; |
| 12 | WRITELN |
| 13 | END |
| 14 | END. |