В заданном слове замените первый и последний символы на символ «*»
В заданном слове замените первый и последний символы на символ «*».
program zad_9_nica;
var s1: string;
BEGIN
writeln ('Введите слово:');
readln (s1);
s1:='*' + Copy(s1, 2, (Length(s1)-2)) + '*';
writeln ('Результат:');
writeln (s1);
END.