У якому випадку аргументом математичної функції є інша функція

// PascalABC.NET 3.0, сборка 1144 от 16.01.2016
begin
  var a:=ArrRandom(100,-10,10);
  a.Println;
  Writeln(a.Where(x->x>0).Count,' положительных, ',
    a.Where(x->x<0).Count,' отрицательных')
end.

Тестовое решение:
4 -6 0 8 2 -2 -1 -8 -6 8 -3 7 4 -7 -5 9 0 -3 -7 1 0 -4 6 3 8 -10 4 9 3 5 8 5 5 8 10 4 -8 3 8 8 -9 2 7 -8 -7 -5 2 -9 0 9 -7 7 -2 -6 7 -2 -1 7 -10 2 4 1 -1 0 10 3 -8 6 -6 2 6 7 -1 -4 -1 8 0 3 0 2 -2 2 -1 5 1 -9 -4 1 -9 1 -6 -5 3 -4 -7 1 -7 -3 -7 1
51 положительных, 42 отрицательных

#!/bin/bash

a=$true

while ($a)

do

clear

echo "1. Enter path"

echo "2. Enter file extension"

echo "3. Copy file"

echo "4. Exit"

read VAR

clear

if [[ $VAR -eq 1 ]]

then

echo "enter path"

read path

read -p "Нажмите ENTER для продолжения"

fi

if [[ $VAR -eq 2 ]]

then

echo "Enter file extension"

read fex

cd $path

ls *.$fex

read -p "Нажмите ENTER для продолжения"

fi

if [[ $VAR -eq 3 ]]

then

echo "enter path to copy file"

read pathcopy

cp -R $path/*.$fex $pathcopy

read -p "Нажмите ENTER для продолжения"

fi

if [[ $VAR -eq 4 ]]

then

echo "Exit"

read -p "Нажмите ENTER для продолжения"

let "a=false"

fi

done

Объяснение: