pascalabcnet/InstallerSamples/!Tutorial/01_First/StringPlus.pas

8 lines
140 B
ObjectPascal

// Сложение строк
var s1: string := 'Pascal';
var s2: string := 'NET';
begin
writeln(s2+'-'+s1);
writeln(s1+'.'+s2);
end.