Input/Output for lines of text: Difference between revisions
→{{header|ALGOL 68}}
(→{{header|Perl 6}}: try to follow the (assumed) intention of the task description) |
Catskill549 (talk | contribs) |
||
Line 44:
show line( ( STRING line; read( ( line, newline ) ); line ) )
OD
</lang>
=={{header|AWK}}==
<lang AWK>
# syntax: GAWK -f INPUT_OUTPUT_FOR_LINES_OF_TEXT.AWK
BEGIN {
getline n
while (i++ < n) {
getline
str = sprintf("%s%s\n",str,$0)
}
printf("%s",str)
exit(0)
}
</lang>
| |||