Messages

ta dufam ze da to co mam na bombach :D:D... viac menej tam idem len pozret sa a prihlasit sa na toho 13teho :/ takze tak

hej, ale pis mu zo svojho mailu TExxxxxx pretoze gmail ma v spame

ja tam som tiez ... a tiez neviem ci to je dobre alebo zle. Ked nevyjdu bomby tak sa zahlasim na 13teho :D:D

btw z coho robite bomby ked robite ... co myslite co da zajtra ? no ja typujem axonometriu, beziera a este nejaku hardcore otazku

no, tak zajtra tam iba idem statistiku spravit a asi sa mu prihlasim na toho 13teho Lebo zajtra mam po obede aj jednocipaky, o ktorych este nemam sajnu ...  zajtra bude hardcore :/

nechce sa niekto vymenit ? z 10teho na 5teho ? ? prosim

no ja som zvedavy na zajtra, este nic neviem ... da sa opisovat aspon ?

Tak ako, bol uz niekto na skuske ? Alebo pozna niekto niekoho, co bol na skuske ? Napiste ako co kde zadanie ? nezadanie? ako to prebiehalo.

z minuleho roku tu mam zopar  obvodov teda iba 2 ... 8253 = 4B = A1, A0;
                                                                        8251 = 2B = A0;

Bohuzial mam iba tieto dva z minuleho roku ... no a tie obvody sa nazyvaju za casovace. dufam ze Vam to pomoze trocha...... potreboval by som ja teda 8255 a 8155, takze ak niekto vie tak pls sem s tym

hmm, jak A1 a 10 co znamena ta 10tka su tam kriziky od A1 po A10 ci v A1 a A10 a A0 ?

Taaakze, mal niekto tento tyzden uz pisomku ? Ked ano, ake zhruba otazky boli a s kym (cviciaci) ?

v siedmej otazke ma kto z vas pravdu

si si isty ? ebo ja som z toho lejen

pastne tu niekto adresu toho ftpcka pls...

Zdravim, zalozil som tento topic pre opakujucich z predmetu Tjava. Vcera mali skusku, a chcel by som sa dozvediet ako dopadli, a ci nieco spominal niekto o dalsom termine.

no pochvalte sa ludia ako ste obstali dnes s otazkami ... psicho gratz

no ved ja nikoho neobvinujem, ja len som smutny, ze musim opakovat rocnik a zasa platit, nonakoniec je to najviac moja chyba... dik za nazory vsem.

Ta, ja som nespravil Zswi, lebo som sa ucil na ZI a dalsie terminy uz nevypisuje... takze koli zswi nestatnicovemu predmetu (asi)  mam opakovat tretiak ... ywetka by sa mohla u doc. havliceho prihovorit aby vypisal este termin.

Vratme sa konecne k topicu ... Na co sa najviac zameral test ? Ci treba vediet vsetko ?

tak ak mate nieco na tu TI co zmizlo z hypnosu tak mi pls napiste na 270940441 lebo to surne potrebujem, zajtra idem domof a tam uz inet nemam... pls .. tnx

joj to bolo tesne, este ze som informatik ... E(55) sincak rulezz keby bol kazdy taky tak to radost zit ! Vascak nech ide do chuja stamad on z toho robi umelu idiotinu a nie umelu inteligenciu

boli ste dnes niekto na UI ako to dopadlo s odovzdavanim Lisp ?

cheky diq

btw to si ty cheklovsky ?

trocha som sa dnes nudil a spravil som toto:

Code [Select] Expand


1.)  Napíšte funkciu, ktorá vráti počet prvkov v zozname (neobsahujúcom ďalšie zoznamy) - nepoužite LENGTH !
(defun len(list)
(cond ((null list) 0)
((null (cdr list)) 1)
(t (1+ (len (cdr list))))
)
)

2.) Napíšte funkciu, ktorá zistí, či počet prvkov v zozname (na najvyššej úrovni) je párny, alebo nepárny - nepoužite LENGTH !
(defun len(list)
(cond ((null list) 0)
((null (cdr list)) 1)
(t (1+ (len (cdr list))))
)
)

(defun parny(list)
(if (eq (mod (len list) 2) 0) 'parny 'neparny))



5.) Napíšte funkciu, ktorá zistí, či daný prvok je prvkom zoznamu (neobsahujúceho ďalšie zoznamy).
(defun contains(c list)
(cond ((eql c (car list)))
((null (cdr list)) (not (null (cdr list))))                         
(t (contains c (cdr list)))
)
)

6.) Napíšte funkciu, ktorá zistí, koľkokrát sa daný prvok vyskytuje v zozname (neobsahujúcom ďalšie zoznamy).
(defun counter(c list)
(cond ((eql c (car list)) (1+ (count c (cdr list))) )
((null (cdr list)) 0)                         
(t (count c (cdr list)))
)
)


7.) Napíšte funkciu, ktorá zistí, koľkokrát sa daný prvok vyskytuje v zozname (neobsahujúcom ďalšie zoznamy).
(defun nthelm(n list)
(cond ((eq 1 n) (car list))
(t (nthelm (- n 1) (cdr list))))
)


8.) Napíšte funkciu, ktorá vráti počet párnych čísel v zozname (neobsahujúcom ďalšie zoznamy).
(defun evenelm(list)
(cond  ((null (cdr list)) (if (eq (mod (car list) 2) 0) 1 0))
((eq (mod (car list) 2) 0) (1+ (evenelm(cdr list))))
(t (evenelm(cdr list)))
)
)

9.) Napíšte funkciu, ktorá vráti počet nepárnych čísel v zozname (neobsahujúcom ďalšie zoznamy).
(defun oddelm(list)
(cond  ((null (cdr list)) (if (eq (mod (car list) 2) 1) 1 0))
((eq (mod (car list) 2) 1) (1+ (evenelm(cdr list))))
(t (evenelm(cdr list)))
)
)

11.) Napíšte funkciu, ktorá vráti posledný prvok zoznamu (neobsahujúceho ďalšie zoznamy) - nepoužite LENGTH !
(defun last(list)
(cond
((null list) (return list))
((null (cdr list)) (car list))
(t (last (cdr list)))))


3. a 4. napisal MKI a 10. mam ja takze to tu nedavam..

:nevyhadzuje ti ta 11 pri kompilacii problem ?..lebo mne hej a nevem s tym ani pohnut, pls neskusil by si sa na to pozriet ?

eh no jasne ze vyhadzuje.. som si to nevsimol.. vyhadzuje preto lebo funkcia last uz v lispe existuje ... takze staci premenovat last na co ja viem napriklad lst..
takze spravne takto:
(defun lst(list)
(cond
      ((null list) (return list))
      ((null (cdr list)) (car list))
      (t (lst (cdr list)))))

ja nechcem vyzerat ako totalny magor, ale mne to neslape ani s tym lst ani s nicim inym..postup je ako pisal uz ejden vyssie..new, save, compile a na zaver load ?

(defun lst(list)
(cond
      ((null list) (list))
      ((null (cdr list)) (car list))
      (t (lst (cdr list)))))

takto by to mohlo ist...

vypise to LST a co dalej, pls poradte.

Este sa chcem opytat, niekto tuna hovoril o new/save/compile a load ... prve tri sa mi podarilo bez vacsich problemov a co s tym 3tim ako tam dam zoznam a ako prinutim program aby si bral polozky z toho zoznamu (klucove slovo load som nenasiel v lispe nikde v menu :D:D)

no vzhuru do nebe ide sa na to. cas 6:19 miesto nezname ... let's start Mision imposible.

Btw: podla mna to bude tak ako na skuske. Budu dopredu vytlacene papieriky, trebars 4 skupiny a kazdy 4ty dostane tu skupinu. Pripadne 8 skupin a kazdy druhy rad "pekna" predstava ako pre koho   ... pred pisomkou:  , cez pisomku: , po pisomke    a po tomto <<< a nakoniec:  domov.