Toon posts:

Turbo Pacal variable data overzetten

Pagina: 1
Acties:

Verwijderd

Topicstarter
Ik ben net begonnen met het leren van turbo pascal, maar een ding lukt me niet, ik wil bijvoorbeeld een data overzetten van de ene variable naar de ander, een goed voorbeeld hiervan is een inlog scherm.

program inlog;

var username,password:string;
username_goedoffout,password_goedoffout:boolean;

begin

writeln('Welkom, voer a.u.b je username en password in')
writeln('Username please');
readln(username);
writeln('password please');
readln(password);

end.

Nou ja, tot zover kom ik. Hoe zorg ik nou dat die boolean verteld of de username en passwrd goed of fout zijn (ik denk dat ik ook een integer nodig heb)

  • whoami
  • Registratie: December 2000
  • Laatst online: 06:24
code:
1
2
3
4
5
6
7
8
9
function Controleer(usernaam, pwd);
begin
  if (usernaam = 'jfjfj') and (pwd = 'jdjdjd') then begin
     Result := True;
  end
  else begin
     Result := False;
  end;
end;

https://fgheysels.github.io/


  • Alarmnummer
  • Registratie: Juli 2001
  • Laatst online: 09-07-2024

Alarmnummer

-= Tja =-

tis al heeeeel lang geleden dat ik in pascal iets heb gedaan, maar er moet toch een return type bij die function staan?

  • Nibble
  • Registratie: Juli 2001
  • Laatst online: 09-09 09:06
ben te lam om alles nog een keer in te tikken, kloteforum, wachtwoord+user vergeten, ga terug, weg reactie. :(

T is for TANK, and T is for TERROR ... and K is the K for KILLING in error.


  • Sponz
  • Registratie: Juni 2001
  • Niet online

Sponz

nul nest parfait saif moi

Op donderdag 10 januari 2002 11:28 schreef Alarmnummer het volgende:
tis al heeeeel lang geleden dat ik in pascal iets heb gedaan, maar er moet toch een return type bij die function staan?
Klopt. Dit lijkt me dan ook meer delphi, daar mag je dit doen.

  • Alarmnummer
  • Registratie: Juli 2001
  • Laatst online: 09-07-2024

Alarmnummer

-= Tja =-

code:
1
2
3
4
function Controleer(usernaam, pwd):boolean;
begin
  Result:=(usernaam = 'jfjfj') and (pwd = 'jdjdjd');
end;

zoiets geloof ik..

tis echt lang geleden zeg :)

  • whoami
  • Registratie: December 2000
  • Laatst online: 06:24
Op donderdag 10 januari 2002 11:28 schreef Alarmnummer het volgende:
tis al heeeeel lang geleden dat ik in pascal iets heb gedaan, maar er moet toch een return type bij die function staan?
Inderdaad. foutje.

https://fgheysels.github.io/


  • Alarmnummer
  • Registratie: Juli 2001
  • Laatst online: 09-07-2024

Alarmnummer

-= Tja =-

Op donderdag 10 januari 2002 11:46 schreef whoami het volgende:

[..]

Inderdaad. foutje.
Maakt niet uit, wie progt er nog in pascal? :) (vroeger vond ik het mooiste wat er was.. en toen kwam c en toen java (als we in imperatieve talen blijven)).

Verwijderd

Topicstarter
Nja als pascal zo oud is, welke taal zou ik dan mee moeten beginnen (dit is me eerste, allen even lachen :) )
Want ik zie idd ook niemand meer met pascal programeren.

  • Alarmnummer
  • Registratie: Juli 2001
  • Laatst online: 09-07-2024

Alarmnummer

-= Tja =-

Ik vind pascal een uitstekende taal om mee te beginnen. Je zou eventueel ook kunnen kiezen voor Java, maar de kans is groot dat je de basis principes niet goed leert omdat java zoveel kan.

  • whoami
  • Registratie: December 2000
  • Laatst online: 06:24
Op donderdag 10 januari 2002 12:22 schreef ChaosKnight het volgende:
Nja als pascal zo oud is, welke taal zou ik dan mee moeten beginnen (dit is me eerste, allen even lachen :) )
Want ik zie idd ook niemand meer met pascal programeren.
Doe maar gewoon verder met pascal. Het gaat erom dat je leert programmeren, en dat doe je in ieder welke taal. (Voorwaarde is wel dat het een goeie taal is). Als je kunt programmeren, dan kan je nog altijd een nieuwe taal aanleren en dat zul je wel vlug leren.

https://fgheysels.github.io/

Pagina: 1