[programmeren] turbo pascal
Moderators: ArcherBarry, Fuzzwood
-
- Berichten: 44
[programmeren] turbo pascal
ik moet de volgende opdracht maken maar ik zit vast.
OPGAVE:
maak een programma waarin gevraagd wordt: 'geef de gebruikersnaam'
en op de tweede regel wordt gevraagd: 'geef het wachtwoord'
als die twee dingen zijn ingevoerd verschijnt er op de volgende regel:
'OK. U bent ingelogd' als bij gebruikersnaam 'leerling' is ingevoerd en als wachtwoord 'wxpwxp'
als het niet klopt dan verschijnt er ' Gebruikersnaam en/of wachtwoord foutief, u wordt niet ingelogd'
Aanwijzing-> gebruik IF(....) AND (....) THEN.......;
Ik heb al
program Computer;
uses crt;
var l,w:string;
begin
clrscr;
writeln (' Geef de gebruikersnaam: ');
readln (l);
writeln (' geef het wachtwoord: ');
readln (w)
...
ik heb de rest ni kan er iemand me helpen aub???
OPGAVE:
maak een programma waarin gevraagd wordt: 'geef de gebruikersnaam'
en op de tweede regel wordt gevraagd: 'geef het wachtwoord'
als die twee dingen zijn ingevoerd verschijnt er op de volgende regel:
'OK. U bent ingelogd' als bij gebruikersnaam 'leerling' is ingevoerd en als wachtwoord 'wxpwxp'
als het niet klopt dan verschijnt er ' Gebruikersnaam en/of wachtwoord foutief, u wordt niet ingelogd'
Aanwijzing-> gebruik IF(....) AND (....) THEN.......;
Ik heb al
program Computer;
uses crt;
var l,w:string;
begin
clrscr;
writeln (' Geef de gebruikersnaam: ');
readln (l);
writeln (' geef het wachtwoord: ');
readln (w)
...
ik heb de rest ni kan er iemand me helpen aub???
- Berichten: 6.905
Re: [programmeren] turbo pascal
moet je geen maximale lengte zetten bij het declareren van je string?
Kijk alvast hier: http://math.uww.edu/~harrisb/courses/cs171/strings.html en hier: http://en.wikipedia.org/wiki/Pascal_programming_language
Kijk alvast hier: http://math.uww.edu/~harrisb/courses/cs171/strings.html en hier: http://en.wikipedia.org/wiki/Pascal_programming_language
Het vel van de beer kunnen verkopen vraagt moeite tenzij deze dood voor je neervalt. Die kans is echter klein dus moeten we zelf moeite doen.
-
- Berichten: 8.614
Re: [programmeren] turbo pascal
Zoals jhnbk reeds zei: bij het declareren van een String moet je het maximale aantal tekens aangeven. Dit doe je tussen rechte haken, bijvoorbeeld:
In dit voorbeeld is de maximale lengte van de String 15 tekens.
Verder zou je moeten weten dat je opdrachten in procedures moet verdelen en niet direct 'BEGIN' mag schrijven na de declaratie van de variabelen.
Het begin van je programma wordt dus:
Denk nu eens na en volg de logica van de computer. Je moet eerst vragen of de gebruikersnaam 'leerling' is (lees: vragen of de gebruikersnaam gelijk is aan 'leerling'):
Code: Selecteer alles
VAR l,w:String[15]
Verder zou je moeten weten dat je opdrachten in procedures moet verdelen en niet direct 'BEGIN' mag schrijven na de declaratie van de variabelen.
Het begin van je programma wordt dus:
Code: Selecteer alles
Program Computer;
Uses Crt;
VAR l,w:String[15]
Procedure Invoer;
Begin
ClrScr;
Write(' Geef de gebruikersnaam: ');
ReadLn(l);
Write(' Geef het wachtwoord: ');
ReadLn(w)
End;
Procedure Verwerking;
Begin
- Als dat zo is moet je een tweede vraag stellen, namelijk of het wachtwoord gelijk is aan 'wxpwxp':
- Als dat zo is moet je afdrukken 'OK. U bent ingelogd';
- Als dat niet zo is moet je afdrukken 'Gebruikersnaam en/of wachtwoord foutief, u wordt niet ingelogd'.
- Als dat niet zo is moet je afdrukken 'Gebruikersnaam en/of wachtwoord foutief, u wordt niet ingelogd'.
Geloof niet alles wat je leest.
Heb jij verstand van PHP? Word Technicus en help mee om Wetenschapsforum nog beter te maken!
Heb jij verstand van PHP? Word Technicus en help mee om Wetenschapsforum nog beter te maken!