Question

В данном слове замените первый и последний символы на символ

Answer 1

program Example5;
var   word: string;
begin   word := 'строка';   word[1] := '!'; // Замена первого символа   word[length(word)] := '!'; // Замена последнего символа   writeln(word); end.