This repository has been archived on 2024-12-25. You can view files and clone it, but cannot push or open issues or pull requests.
2024-03-10 20:32:51 +03:00

12 lines
266 B
ObjectPascal

// Строки. Операция + и оператор +=. Доступ по индексу
var s: string := 'Pascal';
begin
writeln(s);
s := s + '.';
writeln(s);
s += 'NET';
writeln(s);
writeln(s[1],' ',s[2],' ',s[3],' ',s[4],' ',s[5],' ',s[6]);
end.