[Prog] Broncode Reeks 1

Forum van 1ste Bachelor Informatica.

Moderator: Praesidium

User avatar
Shinta
WOZ
Posts: 1122

Broncode Reeks 1

Post#1 » Fri Oct 14, 2005 6:43 pm

OFF-LINE
Last edited by Shinta on Fri Jan 20, 2006 1:47 pm, edited 3 times in total.

User avatar
Nick
Prosenior
Posts: 1850
Contact:

Post#2 » Fri Oct 14, 2005 9:49 pm

Olé merci hé kristof
Kzal da dees weekend direct eens nader bekijken se ...
God ik hoop da de frank (voor de wouter eurocent) rap valt zne
To Woef or not to Woef, that is the question!

WINAK Scriptor 2006-2007
WINAK Vice-Praeses 2007-2008
WINAK Praeses 2008-2009
WINAK Cantor 2009-2010
... en kortom: Eeuwig WINAKer 8)

User avatar
Norfolk
WOZ
Posts: 780
Contact:

Post#3 » Fri Oct 14, 2005 10:21 pm

En oefening 15? Das ook nog de enigste die ik mis :D
Maar das weer zo'n saaie oefening.

User avatar
Shinta
WOZ
Posts: 1122

Post#4 » Sat Oct 15, 2005 12:09 am

oei euh ja dies ontsnapt :wink:
hmm normaal haddek die tog gemaakt ze, kzal morge wellis zien, kben nu te moe.
Remember remember the fifth of November
Gunpowder, treason and plot.
I see no reason why gunpowder, treason
Should ever be forgot...

User avatar
Arawn
Posts: 39
Contact:

Post#5 » Sun Oct 16, 2005 2:20 pm

da zijn me toch een stel kut oefeninge ze maat!

btw in uw oef 7 gebruikt ge uw variabele 'index3' niet dus die mag er uit. :wink:
=+=+=+=+=+=+=+=+=+=+=+=+=+=+=

http://antira.blackmetal.be

=+=+=+=+=+=+=+=+=+=+=+=+=+=+=

User avatar
j0lle
WOZ
Posts: 396

Post#6 » Sun Oct 16, 2005 3:30 pm

Arawn wrote:da zijn me toch een stel kut oefeninge ze maat!

btw in uw oef 7 gebruikt ge uw variabele 'index3' niet dus die mag er uit. :wink:
FOR index3 := 1 TO n+1-index DO
qwertyuiop

User avatar
WiDeCr0w
Posts: 38
Contact:

Post#7 » Sun Oct 16, 2005 6:11 pm

Great, thnx!
[img]http://www.widecrow.com/newbanner.jpg[/img]

User avatar
Norfolk
WOZ
Posts: 780
Contact:

Post#8 » Sun Oct 16, 2005 7:53 pm

Ik heb ze allemaal ondertussen, en er zitten inderdaad veel kutoefeningen bij.

User avatar
Nick
Prosenior
Posts: 1850
Contact:

Post#9 » Sun Oct 16, 2005 8:05 pm

Seg als probeer da te compilere dan geeft die n fout weer van missing ";"
ook al staat ze der :s
To Woef or not to Woef, that is the question!

WINAK Scriptor 2006-2007
WINAK Vice-Praeses 2007-2008
WINAK Praeses 2008-2009
WINAK Cantor 2009-2010
... en kortom: Eeuwig WINAKer 8)

User avatar
Norfolk
WOZ
Posts: 780
Contact:

Post#10 » Sun Oct 16, 2005 8:39 pm

lol misschien ergens een woordje verkeerd getypt?

User avatar
WiDeCr0w
Posts: 38
Contact:

Post#11 » Mon Oct 17, 2005 5:43 pm

NickVE wrote:Seg als probeer da te compilere dan geeft die n fout weer van missing ";"
ook al staat ze der :s
ff storen?
[img]http://www.widecrow.com/newbanner.jpg[/img]

User avatar
Shinta
WOZ
Posts: 1122

Post#12 » Wed Oct 19, 2005 7:12 pm

Ik heb mijn broncode geupdate met oefening 15 erbij en ook heb ik de tool van die reeks gepost om jullie leven nog gemakkelijker te maken ;).
Remember remember the fifth of November
Gunpowder, treason and plot.
I see no reason why gunpowder, treason
Should ever be forgot...

sammyke007

Post#13 » Mon Oct 24, 2005 4:06 pm

Code: Select all

PROCEDURE oef16*; 
    	TYPE 
        	Tabel = ARRAY 100 OF INTEGER; 
        VAR 
     	   getal, index, index2 : INTEGER; 
            rij : Tabel; 
    
		BEGIN 
    	OutExt.Open(); 
    	OutExt.Clear(); 
    	In.Open(); 
    	In.Int(getal); 
    	index:= -1; 
    	REPEAT 
     	   INC(index); 
       	 rij[index] := getal MOD 2; 
        	getal := getal DIV 2;    
   	 UNTIL (getal = 0); 
    	FOR index2 := 7 TO 0 BY -1 DO       <-----------
       	 OutExt.Int(rij[index2], 0); 
   	 END; 
    	OutExt.Ln(); 
END oef16;    
Ik heb het van 7 TO 0 gedaan zodat je altijd alle 0-etjes en 1-tjes ervoor ook altijd krijgt (dus altijd 8x een nul of één en niet enkel de nodige waarden...).

Sorry :P

Krikke
Posts: 29

Post#14 » Mon Oct 24, 2005 5:47 pm

gooooooooooooo sammy

nog maar 6 oefeninge van reeks 2 nu :mrgreen:

User avatar
Norfolk
WOZ
Posts: 780
Contact:

Post#15 » Mon Oct 24, 2005 5:48 pm

Lekker veel werk nog :D

Return to “1ste Bachelor”

Who is online

Users browsing this forum: No registered users and 4 guests

cron