6 lines
98 B
Text
6 lines
98 B
Text
procedure main()
|
|
L := [: 1 to 5:]
|
|
delete(L,4)
|
|
insert(L,2,"hello")
|
|
every write(!L)
|
|
end
|