Через paskal написать программу, котрая заменяет все маленькие буквы на большие , в строке ,котрая вводится при запуске программы

// PascalABC.NET 3.3

begin
  var s:=ReadlnString;
  s:=s.Select(c->Upcase(c)).JoinIntoString;
  s.Println;
end.

Пример:
написать программу, котрая заменяет все маленькие буквы на большие
НАПИСАТЬ ПРОГРАММУ, КОТРАЯ ЗАМЕНЯЕТ ВСЕ МАЛЕНЬКИЕ БУКВЫ НА БОЛЬШИЕ