Решить Задание 11. С SQL-запроса вывести список студентов из таблицы, номера зачет-ных книжек которых принадлежат списку: 213171, 111123, 223153, 223147. Использовать опера-тор IN. Задание 12. С SQL-запроса вывести список студентов из таблицы Студент старше 1985 года рождения.
Задание 13. С SQL-запроса вывести список студентов, ФИО которых совпадает с одним из перечисленных значений: Петров А.И., Ахметов И.Р., Вострецов А.А.
Задание 14. С SQL-запроса вывести список студентов, фамилия которых оканчи-вается на букву «а». Список должен содержать полные сведения о студенте.
Задание 15. С SQL-запроса сформировать список студентов заданной группы, фамилия студентов должна начинаться на букву «Б». Список должен содержать полные сведения о студенте.
Задание 16. С SQL-запроса сформировать список студентов заданной группы 1986 года рождения. Список должен содержать полные сведения о студенте.
Задание 17. С SQL-запроса сформировать список студентов, номер зачетной книжки которых начинается на 21. Список должен содержать полные сведения о студенте.
Задание 18. С SQL-запроса выполнить разделение даты рождения студентов на отдельные столбцы: дата, месяц, год. Результат запроса должен содержать полные сведения о студенте.
Задание 19. Сделайте копию Запроса 18, оставьте вывод тех же сведений, только вместо номера месяца выведите его название (январь, февраль…). Для этого используйте функцию MonthName, аргументом которой будет значение функции Month.
Задание 20. Создать SQL-запрос с параметром, параметр Номер группы. Результат запроса должен содержать полные сведения о студенте.

Общее решение, позволяющее удалять из строк любой "мусор"

// PascalABC.Net 3.0, сборка 1066
procedure CheckString(var s:string; var n:integer);
var
  i:integer;
begin
  i:=Length(s);
  while i>0 do begin
    if not(s[i] in ['a'..'z']) then Delete(s,i,1);
    Dec(i)
  end;
  n:=Length(s)
end;

var
  s1,s2:string;
  i,p,n1,n2:integer;
begin
  Write('Введите первую строку: '); Readln(s1);
  CheckString(s1,n1);
  if n1=0 then Writeln('Введенная строка не содержит допустимых символов')
  else begin
    Write('Введите вторую строку: '); Readln(s2);
    CheckString(s2,n2);
    if n2=0 then Writeln('Введенная строка не содержит допустимых символов')
    else
      { теперь обе строки содержат только маленькие латинские буквы }
      if n1=n2 then begin
        for i:=1 to n1 do begin
          p:=Pos(s1[i],s2);
          if p=0 then Break
          else Delete(s2,p,1)
          end;
        if Length(s2)=0 then Writeln('Решение имеется')
        else Writeln('Решения нет')
        end
      else
        Writeln('Решения нет');
    end
end.

Тестовое решение:
Введите первую строку: this is my own deal!
Введите вторую строку: Тест: *is  now=l2ead  my   sthi?
Решение имеется

Также имеется современное решение, которому пока что в школах не учат:
// PascalABC.Net 3.0, сборка 1066
begin
  var s1:=ReadString('Введите первую строку: ').Where(x->x in ['a'..'z']);
  if s1.Count=0 then
    Writeln('Введенная строка не содержит допустимых символов')
  else begin
    var s2:=ReadString('Введите вторую строку: ').Where(x->x in ['a'..'z']);
    if s2.Count=0 then
      Writeln('Введенная строка не содержит допустимых символов')
    else
      if s1.Except(s2).Count>0 then Writeln('Решения нет')
      else Writeln('Решение имеется')
    end
end.

Вербальная модель — информационная модель в мысленной или разговорной форме.

Вербальные модели - это модели полученные в результате раздумий, умозаключений. Они могут так и остаться мысленными или быть выражены словесно. Примером такой модели может стать наше поведение при переходе улицы. Человек анализирует ситуацию на дороге (что показывает светофор, как далеко находятся машины, с какой скоростью они движутся и т. п.) и вырабатывает свою модель поведения. Если ситуация смоделирована правильно, то переход будет безопасным, если нет, то может произойти авария. К таким моделям можно отнести и идею, возникшую у изобретателя, и музыкальную тему, промелькнувшую в голове композитора, и рифму, прозвучавшую пока еще в сознании поэта.