4 lines
61 B
ObjectPascal
4 lines
61 B
ObjectPascal
begin
|
|
foreach c:char in ['a','b','c'] do
|
|
Write(c);
|
|
end. |