Опубликовано 13.06.2017 по предмету Информатика от Гость >> <<

В PascalABC дана последовательность целых чисел,в этой последовательности есть два нуля, располагаются они в разных местах, надо найти количество чисел стоящих между этими нулями.

Ответ оставил Гость

// PascalABC.NET 3.0, сборка 1128
begin
  var s:=6 -5 34 14 0 63 5 18 -34 0 45 12 -7;
  Writeln(s.ToWords.SkipWhile(x->x<>0).Skip(1).TakeWhile(x->x<>0).Count)
end.