Дан одномерный массив чисел. найти количество элементов массива, равных заданному числу, и вывести их номера. найти сумму элементов массива,принадлежащих промежутку от а до b.отрицательные элементы массива возвести в квадрат.

// f# [< entrypoint> ] let main argv =     let getrandomcollection n =         let rand = new system.random()         array.map (fun x -> rand.next(-10, 10)) [| 1..n |]     let inputarray = getrandomcollection 15     printf "source array: %a\n" (inputarray |> array.tolist)     // first part     printf "numbertocheckonequal: "     let numbertocheckonequal = system.console.readline() |> system.int32.parse     let indecesequalstonumber =         inputarray         |> array.mapi (fun i x -> (x, i))         |> array.filter (fun (x, i) -> x = numbertocheckonequal)         |> array.map (fun (x, i) -> i)         |> array.tolist     printf "%d equals to %d: %a\n" (indecesequalstonumber |> list.length) numbertocheckonequal indecesequalstonumber     // second part     printf "a: "     let a = system.console.readline() |> system.int32.parse     printf "b: "     let b = system.console.readline() |> system.int32.parse     let sum =         inputarray.[a..b]         |> array.sum     printf "sum of array [%d..%d]: %d\n" a b sum     // last part     let finalarray =         inputarray         |> array.map (fun x -> if x < 0 then x*x else x)     printf "final array: %a" finalarray     system.console.readkey true |> ignore     0

2531647

Объяснение:

Сначала идёт протокол "http", потом обязательные символы "://", затем доменное имя сайта и доменная зона " poisk.by ", затем ещё один слеш и название файла с его расширением " muzika.docx "