Input/Output for lines of text: Difference between revisions
Added Algol W
(Added FreeBASIC) |
(Added Algol W) |
||
Line 45:
OD
</lang>
=={{header|ALGOL W}}==
<lang algolw>begin
% outputs line plus a newline %
procedure showLine ( string(80) value line ); write( line );
string(80) line;
integer lineCount;
read( lineCount );
for lineNumber := 1 until lineCount do begin
read( line );
showLine( line )
end for_lineNumber
end.</lang>
=={{header|AWK}}==
<lang AWK>
| |||