BasketWink

Hali, a gondom hogy haskellben karaktert kellene kettes számrendszerben megjeleníteni úgy hogy 8 karakter hosszú legyen ha nicns annyi akkor az elejéhez hozzá rakjon a progi 0-ákat. de valamiért nem működik :S itt van a hibakód: és itt a progi kód: import Data.Char (ord) toBinary :: Int -> [Int] toBinary 0 = [] toBinary x = reverse (kisegf x) kisegf 0 = [] kisegf x | x `mod` 2 == 1 = 1 : kisegf (x `div` 2) | x `mod` 2 == 0 = 0 : kisegf (x `div` 2) chrToBinary :: Char -> [Int] chrToBinary x | length (kisegf2 x) == 8 = kisegf2 x | length (kisegf2 x) <8 = ((kisegf2 x) ++ 0) kisegf2 0 = [] kisegf2 x = toBinary(ord 'x') köszi W

A

de a kezdés óta már tuti többen vagyunk szal bukta x.X

4427 néha értelmetlen dolgokat is kell csinálni x.X

futórózsák edzést tartanak és elfutottak

csalás Almát én akartam írni akkor legyen banán x.X

amennyit akarok X.x ha akarok 0-át is tudok islogni 1 perc alatt

6280-asom 3X volt szervízbe de csak szoftvert kellett frissíteni és semmi baja se volt és nekem kvára teccik bár vannak jobb telók is már de egyenlőre ennél maradok elég sokszor ért már földet véletlenből de még mindig működik