treba vediet aj tie jednotlive klasifikacie co su v prvej prezentacii na konci ci nie? Mal vobec niekto otazku s tym?
This section allows you to view all posts made by this member. Note that you can only see posts made in areas you currently have access to.
Zobrazi� pr�spevky MenuQuote from: dEVIANT on 21.04.2010, 18:14:21Quote from: jardo on 21.04.2010, 18:08:45
nazdar,
viete mi povedat co tu je zle?CREATE OR REPLACE TRIGGER faktura_trigger
BEFORE INSERT ON faktura REFERENCING NEW AS NEW FOR EACH ROW
BEGIN
SELECT faktura_seq.nextval INTO:NEW.CISLO_FAKTURY FROM dual; END;
napise mi to ze to prebehlo ale s kompilacnymi chybami
Lol...Telepovská prízvukovala, že Trigger na vloženie next hodnoty sekvencie nemá byťSom neveril, že niekto na to robí trigger
ateda co tam mam ;pozit namiesto triggru
org 1000
dcx sp ;inicializacia zasobnika (0FFFFh)
lxi h,text ;vypis text
call putstr
lxi d,vlozeny ;adresa pre vstup retazca
call getline
lxi b,vlozeny
mvi d,0 ;pocet vsetkych znakov v slove
mvi e,0 ;pocet malych pismen v slove
push psw ;vlozime si nulu do zasobnika, pocet vyhovujucich slov
char:
mvi e,0
mvi d,0 ;vynulovanie pocitadla
char_loop: ;citanie znakov a pocitanie pismen
ldax b ;nacitanie znaku z retazca
inr d
inx b ;posun v retazci doprava
cpi 10 ;porovnanie pre koniec nacitavania, enter
jz koniec_nacitania ;
cpi 32 ;porovnanie na koniec slova, space=medzera
jz pocet_slov
cpi 'a' ;vacsie alebo rovne ako a
jc char_loop
cpi 'z' + 1 ;mensie alebo rovne ako z
jnc char_loop
inr e ;zvysenie poctu pismen o 1
jmp char_loop
pocet_slov: ;pocitanie vyhovujucich slov
mov a,e ;presun hodnoty z registra D do akumulatora
cmp d ;porovnanie akumulatora a registra E
jc char ;ak je pismen malej abecedy menej skoc na char
pop psw ;vyber zo zasobnika do akumulatora
inr a ;zvysenie poctu vyhovujucich slov
push psw ;vlozenie z akumulatora do zasobnika
jmp char
koniec_nacitania: ;osetrenie ak sme spracovali posledne slovo
mov a,e
cmp d
jc vypis
pop psw
inr a ;zvysenie poctu vyhovujucich slov
push psw
jmp vypis
vypis:
lxi h, text2
call putstr
pop psw
adi '0'
call putchar
call newline
hlt
include 'examples\8080\include\getline.inc'
include 'examples\8080\include\putstr.inc'
include 'examples\8080\include\putchar.inc'
include 'examples\8080\include\newline.inc'
text: db 'Program vypise pocet slov(v dekadickom tvare) , ktore obshuju pismena malej abecedy', 10,13,10, 'Zadaj retazec: ',0
text2: db 10,13,'Vysledny pocet: ',0
vlozeny: ds 30
Quoteorg 1000
dcx sp ;inicializacia zasobnika (0FFFFh)
lxi h,text ;vypis text
call putstr
lxi d,vlozeny ;adresa pre vstup retazca
call getline
lxi b,vlozeny
mvi d,0 ;pocet vsetkych znakov v slove
mvi e,0 ;pocet malych pismen v slove
mvi b,0
jmp char_loop
char:
mvi e,0
mvi d,0 ;vynulovanie pocitadla
char_loop: ;citanie znakov a pocitanie pismen
ldax b ;nacitanie znaku z retazca
inr d
inx b ;posun v retazci doprava
cpi 13 ;porovnanie pre koniec nacitavania, enter
jz koniec_nacitania ;
cpi 32 ;porovnanie na koniec slova, space=medzera
jz pocet_slov
cpi 'a'
jc char_loop ;mensie ako a
cpi 'z' + 1 ;mensie ako 'z' + 1
jnc char_loop
inr e ;zvysenie poctu pismen o 1
jmp char_loop
pocet_slov: ;pocitanie vyhovujucich slov
mov a,d ;presun hodnoty z registra D do akumulatora
cmp e ;porovnanie akumulatora a registra E
jz char ;ak je pismen malej abecedy menej skoc na char
;vyber zo zasobnika do akumulatora
inr b ;zvysenie poctu vyhovujucich slov
;vlozenie z akumulatora do zasobnika
jmp char
koniec_nacitania: ;osetrenie ak sme spracovali posledne slovo
mov a,d
cmp e
jz vypis
inr b ;zvysenie poctu vyhovujucich slov
jmp vypis
vypis:
lxi h, text2
call putstr
mov a,b
adi '0'
call putchar
call newline
hlt
include 'examples\8080\include\getline.inc'
include 'examples\8080\include\putstr.inc'
include 'examples\8080\include\putchar.inc'
include 'examples\8080\include\newline.inc'
text: db 'Program vypise pocet slov(v dekadickom tvare) , ktore obshuju pismena malej abecedy', 10,13,10, 'Zadaj retazec: ',0
text2: db 10,13,'Vysledny pocet: ',0
vlozeny: ds 30
Quote from: kilomassa on 23.01.2010, 08:52:21
no je to tak cim viac tym lepsie...viac stran="no vy tu mate toho dost asi tomu aj rozumiete" kedze ja iba dve strany...hm kolega nic moc 6b z prvej....newa treba aj kosouhlu nakreslit plus tto i+II a III +IV si treba dat pozor ze co jake znamienko preco...to co je v tom grafika pdf....duhu otazku aj odovedenie rovnice treba ja som mal a uz zrazu 17b za otazku....k zadaniu len tie hlavicky v kode predna strana menoo ejeho aby bolo predmet na CD tak plus diagramov z kodu programu....dal nam v poho 9 za zadanie aj ked sa mu tam nepacilo .... a ustna ... jedna otazka vies nevies mas 10b aspon u nas....a nakoniec nechapacka..."no bolo to slabsie,ale pridam vam za to ze ste vydrzali cakat (mali sme ist na vyhodnotenie o 3tej dnu za nim de sa pisalo a sli sme o 5tej...)zo 71 na 75"...som myslel,ze odpadnem...po prvej otazke som myslel,ze niiiic a zrazu C...kamosovi este tiez pridal na B,ale on mal fakt tych 4 stran...gl vsetkym