SHOW:
|
|
- or go back to the newest paste.
| 1 | // Task 2 | |
| 2 | let x1 = [ ('a',1); ('b',2); ('c',3); ('d',4) ] // (<масть>,<достоинство>)
| |
| 3 | - | let rec search = function |
| 3 | + | let rec search A = |
| 4 | - | x1 |> List.filter (fun x -> x='a') |
| 4 | + | x1 |> List.filter (fun (x,y) -> x='a') |
| 5 | ||
| 6 | let xLen = x1.Length | |
| 7 | printf "%A\n" ("Задание 2")
| |
| 8 | printfn "%d" (xLen) |
