Дана строка символов. Замените в строке все маленькие буквы на одноименные большие буквы. Надо решить в Pascal.Net
var s:string; begin read(s); writeln(UpperCase(s)); end.