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