Занимательное программирование.

Взял тут: http://habrahabr.ru/post/200190/

Подсчитать объём воды.
например:

и

Моё решение:

  w =: 0 5 3 5 1 2     NB. исходные данные
  f =: >./\ - [        NB. функция для подсчёта "дыр" слева-направо.
  +/ (f w) <. f&.|. w  NB. считаем "дыры" слева-направо и справа-налево и берём меньшее значение для каждой дыры
3

Запись сделана с помощью m.livejournal.com.</p>