9 lines
92 B
ObjectPascal
9 lines
92 B
ObjectPascal
var s:string;
|
|
|
|
begin
|
|
s:='test';
|
|
s[2]:='b';
|
|
writeln(s);
|
|
writeln(s[2]);
|
|
readln;
|
|
end. |