> -- Александр Ильин писал(а):
> Создал тут тестовый модуль, чтобы посмотреть, что к чему в этом CAP.CAP(x) = CHR(ORD(x) - (ORD("a") - ORD("A"))), при том раскладе что коды литер в последовательностях "A".."Z" и "a".."z" идут подряд.
> -- Александр Ильин писал(а):
> Видим, что в XDS функция CAP ведёт себя так, как ожидается, то есть не изменяет символы за пределами отведённого диапазона 'a'..'z'.Как у Вас ожидается.А почему, например, Вы не ожидаете капитализации русских букв? Ведь ни в Оберон, ни в  Оберон-2 про 'a'..'z' ничего не говорится.

P.S. я, например, не ожидал от CAP неизменности...

И вообще, на мой взгляд, эта функция избыточна.