s := '12345';
n := Length(s) + Length('456');
writeln ( n );
Как работает эта программа

s := '12345'; - присваивание значения строковой переменной s

n := Length(s) + Length('456');  - Length(s) -определение длины строки s (5);

 Length('456') - определение длины строки '456' (3); т.е. n = 5+3 = 8

writeln ( n ); - вывод значения n на экран (т.е. выведется 8)