SHOW:
|
|
- or go back to the newest paste.
| 1 | - | // Task 2 |
| 1 | + | |
| 2 | let search A = | |
| 3 | - | let rec search A = |
| 3 | + | A |> List.filter (fun (x,y) -> x='a') |
| 4 | - | x1 |> List.filter (fun (x,y) -> x='a') |
| 4 | + | |
| 5 | printf "%A\n" ("Задание 2")
| |
| 6 | - | let xLen = x1.Length |
| 6 | + | printfn "%A" (search x1) |