RosettaCodeData/Task/Copy-a-string/PL-I/copy-a-string.pli
Ingy döt Net b83f433714 tasks a-s
2013-04-10 23:57:08 -07:00

3 lines
83 B
Text

declare (s1, s2) character (20) varying;
s1 = 'now is the time';
s2 = s1;