Advertisement
noctual

Задание 6

Jun 13th, 2021
1,717
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
F# 0.44 KB | None | 0 0
  1. open System
  2. open System.IO
  3.  
  4. let FS folder file =
  5.     Directory.GetFiles(folder, file)
  6.     |> Array.isEmpty
  7.  
  8. [<EntryPoint>]
  9. let main argv =
  10.     printf "Путь к папке: "
  11.     let path = Console.ReadLine()
  12.     printf "Файл: "
  13.     let file = Console.ReadLine()    
  14.     printfn "В каталоге %A %s %s" path (if FS path file then "нет файла" else "есть файл") file
  15.     0 // return an integer exit code
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement