mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-05-06 18:32:37 +02:00
9 lines
81 B
Plaintext
9 lines
81 B
Plaintext
Program test;
|
|
var s: string;
|
|
begin
|
|
s:='123456789';
|
|
s[1]:=s[2];
|
|
writeln(s);
|
|
end.
|
|
|