Odd word problem: Difference between revisions

Content deleted Content added
→‎{{header|PL/I}}: flagged as incorrect.
m →‎{{header|REXX}}: changed a comment.
Line 2,294: Line 2,294:
call wChar /*write a character (which is a letter)*/
call wChar /*write a character (which is a letter)*/
end /*j*/ /* [↑] perform for "even" words. */
end /*j*/ /* [↑] perform for "even" words. */
call rLett /*read a letter (and maybe punctuation)*/
call rLett /*read letters until punctuation found.*/
call wChar; #= punct /*write a char; punctuation location. */
call wChar; #= punct /*write a char; punctuation location. */
end /*until x==.*/
end /*until x==.*/