Advertisement
noctual

Задание 4

Jun 13th, 2021
1,796
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
F# 0.25 KB | None | 0 0
  1. open System
  2.  
  3. let palindrome m = m = (m |> List.rev)
  4.  
  5. [<EntryPoint>]
  6. let main argv =
  7.     let RND = new Random()
  8.     let m = [1; 2; 1] // true
  9.     //let m = [1; 2; 4] // false
  10.     printfn "%A\n%b" m (palindrome m)
  11.     0 // return an integer exit code
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement