Составить программу, которая определяет длину введённого с клавиатуры слова и составляет новое слово из первой и последней буквы данного слова. Пример ввода: праздник Пример вывода: 8 пк

program lalalavarlen:integer;str:string;beginreadln(str);len:=length(str);write(len+' ');write(copy(str,1,1)+' '+copy(str,len,1));end.