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

begin
  Страны.Выбрать(страна -> страна.Континент = 'Азия')
    .ОтсортироватьПоУбыванию(страна -> страна.Население)
    .Взять(10)
    .Преобразовать(страна -> (страна.Название,страна.Население))
    .ВывестиПострочно
end.