Jump to content

SUBIECTE NOI
« 1 / 5 »
RSS
Centrala Ariston Cares Premium 24...

La multi ani @Klasse!

La multi ani @shmecherul!

pareri ipad 6-2018- flip
 Cum au aparut supermarketurile in...

Campanii mincinoase Carrefour

Tv toshiba defect

touchscreen navigatie stricat
 bonsai - de unde?

Resetare Bonus Malus

Unitatea optica DVD-rw absenta pe...

Problema configurare Wireguard
 Dozatoare de apa, cu alimentare d...

Intarziere aterizare avioane

Accident masina reparata pe CASCO

Probleme Ginseng Microcarpa
 

Haskell

- - - - -
  • Please log in to reply
2 replies to this topic

#1
himura619

himura619

    Junior Member

  • Grup: Members
  • Posts: 122
  • Înscris: 08.08.2013
Am si eu nevoie de ajutor.Trebuie sa fac un calculator grafic (functiile sa fie date de utilizator ) in haskell. Ma poate ajuta cineva cu un cod sau o ideea , orice e bun?

#2
stefanutz13

stefanutz13

    Member

  • Grup: Members
  • Posts: 742
  • Înscris: 04.12.2011
https://www.youtube....KVKLuSnU4UIinKx

Si asta , ca nu am timp acum pt mai mult

import Data.Char (isDigit)
data Term
= TermInt Integer
| TermOp (Integer -> Integer -> Integer)
evaluate :: String -> [Integer]
evaluate = evalTerms . map mkTerm . words
mkTerm :: String -> Term
mkTerm termStr = case termStr of
"+" -> TermOp (+)
"-" -> TermOp (-)
"*" -> TermOp (*)
_
| and $ map isDigit termStr -> TermInt $ read termStr
| otherwise -> error $ "invalid input `" ++ termStr ++ "'"
evalTerms :: [Term] -> [Integer]
evalTerms = foldl modifyStack []
where
modifyStack stack term = case term of
TermInt n -> n : stack
TermOp op -> case stack of
(a:b:_) -> op a b : drop 2 stack
_ -> error "stack too small for operator application"


L.E: cu grafica te descurci :)

Edited by stefanutz13, 24 May 2015 - 19:18.


#3
himura619

himura619

    Junior Member

  • Grup: Members
  • Posts: 122
  • Înscris: 08.08.2013
Nu stiu prea multe dar am sa incerc multumesc pentru ajutor

Anunturi

Bun venit pe Forumul Softpedia!

0 user(s) are reading this topic

0 members, 0 guests, 0 anonymous users

Forumul Softpedia foloseste "cookies" pentru a imbunatati experienta utilizatorilor Accept
Pentru detalii si optiuni legate de cookies si datele personale, consultati Politica de utilizare cookies si Politica de confidentialitate