6 lines
97 B
Text
6 lines
97 B
Text
procedure main()
|
|
a := "qwerty"
|
|
b := a
|
|
b[2+:4] := "uarterl"
|
|
write(a," -> ",b)
|
|
end
|