This commit is contained in:
DavidOnTop 2025-02-11 08:40:57 +01:00
parent 3db57eabca
commit 052267d143
Signed by: DavidOnTop
GPG key ID: 8D3E9A75E3E13D89
3 changed files with 48 additions and 0 deletions

17
ulohyfs/src/u22.fs Normal file
View 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"