Question

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

Answer 1

program lalala
var
len:integer;
str:string;
begin
readln(str);
len:=length(str);
write(len+' ');
write(copy(str,1,1)+' '+copy(str,len,1));
end.