Wyjasnienie kodu + pytanie

[Must]

Witam, jestem nowy na forum, jak zreszta widac, od niedawna, no od niedawna (2dni) zaczalem sie uczyc Pascala. NIe powiem, ze jest to dla mnie trudny jezyk, kilka rzeczy nie rozumiem, nie przeszedłem wszystkich też lekcji tego języka. Ale raczej zaczne wszystko od nowa czytac, bo jedyne co rozumiem to writeln, readln etc. te najprostsze rzeczy.

 

Tutaj mam pytanie: - co można w tym języku napisać, jakie programy, przykłady, jeśli można.

2) Jest tutaj kod:

 

Uses CRT;

 

Const

haslo='Pascal';

 

Var

wprowadz:String;

petla:byte;

 

Begin

REPEAT

ClrScr;

GotoXY(31,12);

Write('Podaj haslo : ');

ReadLn(wprowadz);

IF petla=4 THEN

REPEAT

ClrScr;

GotoXY(31,12);

Write('Access Denied !');

Sound(3160);

Delay(500);

Sound(3190);

Delay(500);

UNTIL 1=2;

petla:=petla+1;

UNTIL wprowadz=haslo;

{ Haslo poprawne, dalsza część programu }

End.

 

Nie rozumiem tych petli, o co chodziło autorowi, np. w tym: UNTIL 1=2;

petla:=petla+1;

 

Nie rozumiem tylko niektórych rzeczy, ale fajnie gdyby ktoś mi to podpisał, co to daje. Dlaczego 1=2.

 

Dzieki!

[babubabu]

Po pierwsze wróć i czytaj kurs bo nikt nie ma zamiaru CI tłumaczyć podstaw które są w każdym kursie. Po drugie nie pomijaj tematów w kursie bo potem nie zrozumiesz dalszych części, czytaj wszystko od deski do deski. Po trzecie napisz do autora tego programu, że jest kretynem bo to się nawet nie skompiluje, a jeśli jest autorem kursu który czytasz to zmień kurs.

 

A w pascalu można napisać wszystko. Aplikacje bazodanowe gry boty do gier trainery wirusy wszystko co sobie zapragniesz.

 

Tu masz kilka pomocnych linków:

http://lmgtfy.com/?q=Kurs+pascala

http://www.lazarus.freepascal.org

http://4programmers.net/Delphi

[Must]

Skompiluje sie, bo juz odpalałem. Ale juz nawet na innym forum, jakis uzytkownik mi powiedział, że nie zna podstaw autour.

 

Na pewno zmienie kurs, bo to z niego mam to.

 

Dzieki za odpowiedz!

[babubabu]

@up mój błąd. Nie dojrzałem pierwszego repeat. Ale jak już użytkownik z innego forum Ci napisał:

 

Przede wszystkim kody Pascalowo/Delphiowe wstawiamy tutaj w odpowiednich znacznikach. I kod formatujemy

 

[olesio]

Tak odpiisałem Ci i wyjaśniłem na 4p. Może autor kursu zna podstawy jakieś. Jednak chcąć ucząć innych powinien nie stosować udziwnień zgodnie z zasadą KISS (BUZI po polsku - patrz Wikipedia). Powinien zainicjować zmienną Petla, stosować formatowanie kodu, a pętla powinna być until False. O ładniejszej pisowni z wielkich znaków zmiennych nie wspomne. Wtedy wszystko było by jaśniejsza. Jeżeli kogoś już chcemy ucxyć, to imo powinniśmy robić to dobrze, by ktoś na starcie nie powielał podstawowych blędów.