Pascal дано десять имен. проверьте, все ли они написаны с прописной буквы, если нет, то исправьте.

// PascalABC.NET 3.2, сборка 1449 от 23.05.2017
// Внимание! Если программа не работает, обновите версию!

begin
  var s:=ReadlnString.ToWords.Select(w->w[:2].ToUpper+w[2:].ToLower)
    .JoinIntoString;
  Writeln(s)
end.

Пример
вася ПеТя Коля ТАНЯ маШа НаТАШа глашА сЕрЕжА МаРИнА витаЛиЙ
Вася Петя Коля Таня Маша Наташа Глаша Сережа Марина Виталий