Springen naar inhoud

(informatica)


  • Log in om te kunnen reageren

#1


  • Gast

Geplaatst op 27 november 2005 - 11:45

(dit is pascal)


PROGRAM Zeskamp.pas
Uses WinCrt;
VAR rugnummer, horden, hoogspringen, kogelstoten, verspringen, speerwerpen, meter600, totaal :REAL;
PROCEDURE ganshetprogramma;
begin
ClrScr;
WriteLn ('punten zeskamp');
WriteLn ('***************');
Write('geef je rugnummer:');
Read(rugnummer);
Write('geef de punten van de 60 meter horden');
Read(horden);
Write('geef de punten van het hoogspringen');
Read(hoogspringen);
Write('geef de punten van het kogelstoten');
Read(kogelstoten);
Write('geef de putnten van het verspringen');
Read(verspringen);
Write('geef de punten van het speerwerpen');
Read(speerwerpen);
Write('geef de punten van de 600 meter');
Read (meter600);
totaal:= rugnummer+horden+hoogspringen+kogelstoten+verspringen+speerwerpen+meter600;
WriteLn('---------------------------------------------')
Write ('totale score: ',totaal:0:0,')
end.

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

#2


  • Gast

Geplaatst op 27 november 2005 - 11:48

hij zegt dat hen in het 16de lijntje zit

Read(kogelstoten);

of erboven of eronder of iets dat ermee temaken heeft

#3

wim600008149

    wim600008149


  • >250 berichten
  • 575 berichten
  • Ervaren gebruiker

Geplaatst op 27 november 2005 - 12:15

Je telt het rugnummer op bij de totale score... :roll: :P

#4

Bart

    Bart


  • >5k berichten
  • 7224 berichten
  • VIP

Geplaatst op 27 november 2005 - 12:26

Misschien wel handig als je aangeeft wat voor error je krijgt.
If I have seen further it is by standing on the shoulders of giants.-- Isaac Newton





0 gebruiker(s) lezen dit onderwerp

0 leden, 0 bezoekers, 0 anonieme gebruikers

Ook adverteren op onze website? Lees hier meer!

Gesponsorde vacatures

Vacatures