1)Дана строка символов среди которых есть двоеточие (:)определите сколько символов ему предшествует.
2)дана строка слов В. Сформулируйте литерную величину А, состоящию из первых букв слов входящих в строку В.
3)Дана строка состояща я из нескольких слов .найдите наибольшую длину слова.
4()в записке слова зашифрованы каждое из них записано на оборот ,расшифруйте сообщение .

PascalABC.NET 3.2:1.begin   write(ReadString.indexof(':'))end.Пример ввода: 1234:56Пример вывода: 42.begin   write(readString.ToWords.Select(x->x[1]).JoinIntoString)end.Пример ввода: Как любила язвить королева, собаки апплодировалиПример вывода: Клякса3.begin   write(readString.ToWords.Select(s->Length(s)).Max)end.Пример ввода: Не хочу учиться хочу женитьсяПример вывода: 84.Если там нет знаков препинания:begin   write(readString.ToWords.Select(s->ReverseString(s)).JoinIntoString(' '))end.Если там есть знаки препинания, которые надо оставить на месте, то настолько же короткого решения мне не придумалось, можно так: begin  var str := readString + ' ';  var m := '';  for var i := 1 to str.Length do    if str[i].IsLetter then      m += str[i]    else    begin      write(ReverseString(m), str[i]);      m := '';    end;end.Пример ввода: амар алым умамПример вывода: рама мыла маму