Springen naar inhoud

[informatica] pascal bug-fixing


  • Log in om te kunnen reageren

#1


  • Gast

Geplaatst op 23 november 2005 - 16:46

weet iemand waar mijn fout zit (het programma dient eigenlijk voor niks maar)

PROGRAM papier.pas;

USES WinCrt;

VAR nieuwepapierdikte, papierdikte ,aantalkeergeplooid :INTEGER;

PROCEDURE Bereken;

BEGIN
papierdikte:=0.1;
aantalkeergeplooid:=0;
REPEAT
aantalkeergeplooid:=aantalkeergeplooid+1;
nieuwepapierdikte:=nieuwepapierdikte+papierdikte;
UNTIL
papierdikte=1;
WriteLn('het papier kan'aantalkeergeplooid, 0:0, 'keer geplooid worden');
ReadLn;
End;
BEGIN
Bereken;

Dit forum kan gratis blijven vanwege banners als deze. Door te registeren zal de onderstaande banner overigens verdwijnen.

#2

Balthazar

    Balthazar


  • >100 berichten
  • 176 berichten
  • Ervaren gebruiker

Geplaatst op 23 november 2005 - 16:49

End;  
BEGIN  
Bereken;


nog een keer End; misschien?

ben niet echt goed met pascal dus als ik iets doms zeg gewoon negeren :roll:

met vriendelijke groet

gijs brouwers

#3


  • Gast

Geplaatst op 23 november 2005 - 16:56

End;  
BEGIN  
Bereken;


nog een keer End; misschien?

ben niet echt goed met pascal dus als ik iets doms zeg gewoon negeren :roll:

met vriendelijke groet

gijs brouwers


dankuwel ik had het niet gezien (maar het is wel END.)

#4


  • Gast

Geplaatst op 23 november 2005 - 16:58

Maar er zit nog een fout in "line 15"
15de liijn dus

#5


  • Gast

Geplaatst op 23 november 2005 - 17:00

Bedoel je met 'plooien' vouwen, in dat geval klopt nieuwepapierdikte niet.
Immers: als je een papier 2 maal vouwt wordt de dikte 4 maal de papierdikte!

Je vertelt niet of je een output krijgt en ook niet of er een foutmelding is.
Want natuurlijk eindigt je body ook met END;

#6

Rogier

    Rogier


  • >5k berichten
  • 5679 berichten
  • VIP

Geplaatst op 23 november 2005 - 17:03

Maar er zit nog een fout in "line 15"
15de liijn dus

Is dat deze?

WriteLn('het papier kan'aantalkeergeplooid, 0:0, 'keer geplooid worden');

Mijn pascal is een beetje weggezakt, maar moet er niet een komma voor aantalkeergeplooid?
In theory, there's no difference between theory and practice. In practice, there is.

#7


  • Gast

Geplaatst op 23 november 2005 - 17:05

Bedoel je met 'plooien' vouwen, in dat geval klopt nieuwepapierdikte niet.
Immers: als je een papier 2 maal vouwt wordt de dikte 4 maal de papierdikte!

Je vertelt niet of je een output krijgt en ook niet of er een foutmelding is.
Want natuurlijk eindigt je body ook met END;

ah dus ik moet *2 doen

#8

coats001

    coats001


  • >25 berichten
  • 61 berichten
  • Ervaren gebruiker

Geplaatst op 23 november 2005 - 18:14

   UNTIL
     papierdikte=1;

Moet zijn nieuwepapierdikte. Die hoog je op en niet papierdikte. Bovendien is het misschien handig om nieuwepapierdikte op 0.0 te initialiseren.





0 gebruiker(s) lezen dit onderwerp

0 leden, 0 bezoekers, 0 anonieme gebruikers

Ook adverteren op onze website? Lees hier meer!

Gesponsorde vacatures

Vacatures