S JavaScriptem funguje tato webová stránka lépe.
Domů
Procházet
lain.church
Nápověda
Registrovat se
Přihlásit se
tA
/
Spiral
Sledovat
1
Oblíbit
0
Rozštěpit
0
Zdrojový kód
Úkoly
0
Požadavky na natažení
0
Vydání
0
Wiki
Aktivita
Procházet zdrojové kódy
remembered to filter even numbers
master
Thorn Avery
před 4 roky
rodič
b071c13cf8
revize
088ff88052
1 změnil soubory
, kde provedl
5 přidání
a
2 odebrání
Rozdělené zobrazení
Diff Options
Zobrazit statistiky
Download Patch File
Stáhněte rozdílový soubor
+5
-2
spiral.hs
+ 5
- 2
spiral.hs
Zobrazit soubor
@@ -54,5 +54,8 @@ main = do
(words args)
aura :: String -> Bool
aura s = foldr (&&) True
(map (`elem` ['0'..'9']) s)
aura s = if (foldr (&&) True (map (`elem` ['0'..'9']) s))
then ((mod rs 2) == 1)
else False
where
rs = (read s)::Int
Zapsat
Náhled
Načítá se…
Zrušit
Uložit