uses Исполнители;

begin
  var кол := Страны.Количество(страна -> страна.Название.НачинаетсяНа('А'));
  Println(кол)
end.