Записи. Pascal ABC

[Andrew5674]

Описать следующие множества: numbers (содержит символы от '0' до '9'), lowerCase(содержит символы от 'a' до 'z'), upperCase(содержит символы от 'A' до 'Z'). Для заданной строки определить, наличие в ней символов разных типов.

Например
Строка Результат
abc Строка содержит символы в нижнем регистре
abC Строка содержит символы в верхнем и в нижнем регистрах
ABC Строка содержит символы в верхнем регистре
aBc123 Строка содержит символы в верхнем и в нижнем регистрах и цифры

[Serge_Bliznykov]

во-первых, при чём здесь название темы ("Записи") ?

во-вторых, задание очень простое.
что у Вас не получается?!

for i:=1 to Length(s) do 
begin
      if s[i] in ['A'..'Z'] then {устанавливаем признак, что в строке есть символы в верхнем регистре};
      if s[i] in ['a'..'z'] then {устанавливаем признак, что в строке есть символы в нижнем регистре};
      if s[i] in ['0'..'9'] then {устанавливаем признак, что в строке есть цифры};
end;