pascalabcnet/InstallerSamples/!Tutorial/07_CharString/String3.pas

10 lines
278 B
ObjectPascal
Raw Normal View History

2025-10-21 11:40:02 +03:00
// Строки. Строка может иметь произвольную длину
2015-05-14 22:35:07 +03:00
begin
2025-10-21 11:40:02 +03:00
var s := 'abcdefghijklmnopqrstuvwxyz';
s := s + UpperCase(s);
2015-05-14 22:35:07 +03:00
s += s;
2025-10-21 11:40:02 +03:00
s += s;
s += s;
Println('Длина строки =', s.Length);
Println('Строка:', s);
2015-05-14 22:35:07 +03:00
end.