Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- open System
- open System.IO
- let FS folder file =
- Directory.GetFiles(folder, file)
- |> Array.isEmpty
- [<EntryPoint>]
- let main argv =
- printf "Путь к папке: "
- let path = Console.ReadLine()
- printf "Файл: "
- let file = Console.ReadLine()
- printfn "В каталоге %A %s %s" path (if FS path file then "нет файла" else "есть файл") file
- 0 // return an integer exit code
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement