22 23
This commit is contained in:
parent
3db57eabca
commit
052267d143
3 changed files with 48 additions and 0 deletions
17
ulohyfs/src/u22.fs
Normal file
17
ulohyfs/src/u22.fs
Normal file
|
@ -0,0 +1,17 @@
|
|||
module UlohyFs.u22
|
||||
|
||||
open System.IO
|
||||
open System.Text.Unicode
|
||||
open UlohyFs.Attributes
|
||||
open System
|
||||
|
||||
[<Uloha(22)>]
|
||||
let uloha22() =
|
||||
printfn "zadaj dajake cislo"
|
||||
let input = Console.ReadLine()
|
||||
let inpint = int input
|
||||
input.ToString()
|
||||
|> Seq.map (fun x -> x.ToString())
|
||||
|> Seq.map (fun x -> int x)
|
||||
|> Seq.sum
|
||||
|> printfn "sum: %d"
|
Loading…
Add table
Add a link
Reference in a new issue