Дан массив строк. Упорядочить строки массива по возрастанию количества пробелов в строках. В Паскаль

Спасибо огромное за помощь!!!

// PascalABC.NET 3.2, сборка 1436 от 01.05.2017// Внимание! Если программа не работает, обновите версию!begin  var n:=ReadlnInteger('Количество строк: ');  var a:=new string[n];  for var i:=0 to n-1 do a[i]:=ReadlnString;  Writeln('*** РЕЗУЛЬТАТ ***');  a:=a.Select(s->(s,s.ToCharArray.Where(c->c=' ').Count))    .OrderBy(vk->vk[1]).Select(vk->vk[0]).ToArray;  a.Println(NewLine)end.ПримерКоличество строк:  4Это   первая   стро  каА     это    вторая       строкаЭто- третья    Четвертая - последняя*** РЕЗУЛЬТАТ ***Это- третья    Четвертая - последняяЭто   первая   стро  каА     это    вторая       строка