create account

Programowanie w Pascalu [#1] by krystiangraba

View this thread on: hive.blogpeakd.comecency.com
· @krystiangraba ·
$2.39
Programowanie w Pascalu [#1]
### Cześć!
Jest to pierwszy "odcinek" kursu który pomoże wkorczyć Ci w świat programowania.
Jako język programowania wybrałem Pascal- jest to język lekko archaiczny i obecnie nie jest stosowany zbyt często, lecz według mnie jest on idealny jako wstęp do programowania.
#### Lazarus IDE
Aby napisać program i móc go uruchomić potrzebujemy tłumacza kodu "ludzkiego" na kod maszynowy.
W przypadku Pascala jednym z lepszych to **Lazarus IDE**, darmowy open-sourcowy program dostępny  na Windowsa, Linuxa i Maca.
###### Instalacja środowiska
Program pobrac można ze strony twórcy: https://www.lazarus-ide.org/index.php?page=downloads.
Wybieramy wersję którą chcemy (w moim przypadku Windows 64 bit) i pobieramy! 
Po pobraniu wystarczy zainstalować oprogramowanie.
![Laz.JPG](https://steemitimages.com/DQmYHKabF1GGZ5Yqx6m4Wy8BYvE7Evm4uzzB2VKwJR5qz52/Laz.JPG)
###### Pierwsze uruchomienie
Po instalacji programu należy go uruchomić oraz kliknąć **Start IDE**
![LA1.JPG](https://steemitimages.com/DQmQ5NhatwqqwjBQMzauYJokZoSZ1dKTFYninkNJ6atw6ya/LA1.JPG)
W celu zwiększenia komfortu naszej pracy polecam zamknąć okna z których nie będziemy korzystać, a są to okna podpisane
* Form1
* Inspektor obiektów
* Edytor Źródeł

#### Pierwszy program
Aby napisać program musimy otworzyć nowy projekt, tak więc klikamy **Plik--->Nowy**. W oknie które wyskoczy wybieramy z listy **Simple program** i zatwierdzamy wciskając **Ok**
![simple.JPG](https://steemitimages.com/DQmZF812FDiWCRgvkeL3YFTAbdtg2rMoQXLFX5iod5b5Nu5/simple.JPG)
Po wszystkim ukaże nam się szablon naszego pierwszego programu
![fp.JPG](https://steemitimages.com/DQmbMfyagVLR6jKSSQpuPriSm8s7N5roDP88a8R1Rt3agvK/fp.JPG)
Widzimy tutaj 3 linijki kodu:
* **program** Project1;,  jest to początek programu w którym określamy jego nazwę, zamiast Project1 możemy wpisać np. Pierwszy_Program
* **begin**, określa początek miejsca w którym zacznie się nasz program
* **end.**, określa koniec naszego programu.
3 wyżej wymienione linijki **zawsze** muszą pojawić się w naszym programie, bez nich nie uda nam się go uruchomić

##### Witaj świecie
Przyjęło się że pierwszy program wypisuje na standardowym wyjściu (w naszym przypadku konsola na monitorze) tekst "Hello World" czyli w języku polskim "Witaj świecie".
Aby napisać taki program musimy poznać polecenia **writeln** oraz **write**.
Ich składnia jest następująca:
* **writeln('**Witaj Świecie'**);**
* **write('**Witaj Świecie'**);**
Czym różnią się oba polecenia? O tym będzie dalej, pokaże to w praktycę :)

Tak więc czas przejść do pisania programu! Wpiszmy pomiędzy linijkę **begin** a **end.** polecenie **writeln('Witaj Świecie');**
![t1.JPG](https://steemitimages.com/DQmTVVXzqKSVZKwNjHYsWgu2yV9Vf8xuCvRRw1bLqxYhG52/t1.JPG)
**UWAGA!** Pamiętaj aby kazde nasze polecenie zakończyć średnikiem!

###### Uruchomienie programu
Program możemy uruchomić na dwa sposoby
* Kliknijmy **Run**, następnie **Kompiluj**, następnie znowu klikamy **Run** i z listy wybieramy **Run**
* Skorzystajmy ze skrótów klawiaturowych, pierwsze wciśnijmy **Ctr+F9** a nastepnie **F9**
![run.JPG](https://steemitimages.com/DQmbXC2gPVV4mTdM5g9j44uFNuxK15TJqwfbDmX232Vpdjh/run.JPG)
Super! Program nam się uruchomił!
Zapewne wyświetliła Ci się konsola i po cwhili zamknęła.
Dlaczego? Ponieważ program po uruchomieniu wykonał się i po prostu się wyłączył nie dając nam czasu na sprawdzenie wyniku naszej pracy.
Aby temu zapobiec należy skorzystać z polecenia **readln;** któro wpisujemy przed poleceniem **end.**
![readl.JPG](https://steemitimages.com/DQmUNhz8xxjX6mRoFNrBu5i636GwSK2gUCDyukUqBeqoEsk/readl.JPG)
Co dokładnie robi polecenie **readln** opowiem w następnej częsci poradnika.

Po edycji programu możemy ponownie skompilować go i uruchomić, tak więc wciśnijmy **Ctr+F9** i **F9**.
Wyświetli nam się teraz konsola w której zobaczymy nasz tekst!![WITAJ.JPG](https://steemitimages.com/DQmPFwb5NC138rCyUUJu8Gk8m26uT3JrjYXNcj9h5yArPES/WITAJ.JPG)

###### write oraz writeln
<center>**writeln**</center>
Polecenie **writeln** po wypisaniu na ekran przechodzi do następnej linijki.
Przykład:
![e1.JPG](https://steemitimages.com/DQmYeKpjiYSMVLspMB17ohTXN5e6184uCWK3MT8FAuogi9J/e1.JPG)

![e2.JPG](https://steemitimages.com/DQmXjt4mH7ie4PnWZN85gsQzJ8bUcMkqjQFFAP9rSrCYxyQ/e2.JPG)
Czyli każde polecenie będzie wypisywane w osobnej linijce.

<center>**write**</center>
**Write** po wypisaniu tekstu na ekran nie przechodzi do nastepnej linijki.
Przykład:
![w1.JPG](https://steemitimages.com/DQmZFhFMuDRUHRALZLd2v2NsGVZuR8Su4nf9zUHnx94KReu/w1.JPG)

![w2.JPG](https://steemitimages.com/DQmSpgWUG12So3GZ7tvyZq1267c8H2crx7yhRWyBj8tLZBu/w2.JPG)
Czyli każde polecenie jest wypisywane w tej samej linijce.

###### Ćwiczenia
A teraz poćwicz, pobaw się i wyczekuj kolejnego postu o nauce programowania w Pascalu!!
<center>
![end.JPG](https://steemitimages.com/DQmXWNL374cr5HAXbBNxcRafJRLLZcyq4fbJvifrX9TenoD/end.JPG)

_____________
https://i.imgsafe.org/dbd8cc3bf6.gif </center>
👍  , , , , , , , , , , , , , , , , , ,
properties (23)
authorkrystiangraba
permlinkprogramowanie-w-pascalu-1
categorypolish
json_metadata{"tags":["polish","pascal","programming","computers","coding"],"image":["https://steemitimages.com/DQmYHKabF1GGZ5Yqx6m4Wy8BYvE7Evm4uzzB2VKwJR5qz52/Laz.JPG","https://steemitimages.com/DQmQ5NhatwqqwjBQMzauYJokZoSZ1dKTFYninkNJ6atw6ya/LA1.JPG","https://steemitimages.com/DQmZF812FDiWCRgvkeL3YFTAbdtg2rMoQXLFX5iod5b5Nu5/simple.JPG","https://steemitimages.com/DQmbMfyagVLR6jKSSQpuPriSm8s7N5roDP88a8R1Rt3agvK/fp.JPG","https://steemitimages.com/DQmTVVXzqKSVZKwNjHYsWgu2yV9Vf8xuCvRRw1bLqxYhG52/t1.JPG","https://steemitimages.com/DQmbXC2gPVV4mTdM5g9j44uFNuxK15TJqwfbDmX232Vpdjh/run.JPG","https://steemitimages.com/DQmUNhz8xxjX6mRoFNrBu5i636GwSK2gUCDyukUqBeqoEsk/readl.JPG","https://steemitimages.com/DQmPFwb5NC138rCyUUJu8Gk8m26uT3JrjYXNcj9h5yArPES/WITAJ.JPG","https://steemitimages.com/DQmYeKpjiYSMVLspMB17ohTXN5e6184uCWK3MT8FAuogi9J/e1.JPG","https://steemitimages.com/DQmXjt4mH7ie4PnWZN85gsQzJ8bUcMkqjQFFAP9rSrCYxyQ/e2.JPG","https://steemitimages.com/DQmZFhFMuDRUHRALZLd2v2NsGVZuR8Su4nf9zUHnx94KReu/w1.JPG","https://steemitimages.com/DQmSpgWUG12So3GZ7tvyZq1267c8H2crx7yhRWyBj8tLZBu/w2.JPG","https://steemitimages.com/DQmXWNL374cr5HAXbBNxcRafJRLLZcyq4fbJvifrX9TenoD/end.JPG","https://i.imgsafe.org/dbd8cc3bf6.gif"],"links":["https://www.lazarus-ide.org/index.php?page=downloads"],"app":"steemit/0.1","format":"markdown"}
created2017-06-13 10:49:33
last_update2017-06-13 10:49:33
depth0
children12
last_payout2017-06-20 10:49:33
cashout_time1969-12-31 23:59:59
total_payout_value1.808 HBD
curator_payout_value0.581 HBD
pending_payout_value0.000 HBD
promoted0.000 HBD
body_length4,936
author_reputation152,792,969,246
root_title"Programowanie w Pascalu [#1]"
beneficiaries[]
max_accepted_payout1,000,000.000 HBD
percent_hbd10,000
post_id4,725,303
net_rshares660,572,191,156
author_curate_reward""
vote details (19)
@lukmarcus ·
Może głupie pytanie, ale... Co mogę zrobić z tym Pascalem?  Czy to się kończy wszystko na konsoli?
properties (22)
authorlukmarcus
permlinkre-krystiangraba-programowanie-w-pascalu-1-20170614t120315232z
categorypolish
json_metadata{"tags":["polish"],"app":"steemit/0.1"}
created2017-06-14 12:03:15
last_update2017-06-14 12:03:15
depth1
children4
last_payout2017-06-21 12:03:15
cashout_time1969-12-31 23:59:59
total_payout_value0.000 HBD
curator_payout_value0.000 HBD
pending_payout_value0.000 HBD
promoted0.000 HBD
body_length98
author_reputation6,879,451,798,530
root_title"Programowanie w Pascalu [#1]"
beneficiaries[]
max_accepted_payout1,000,000.000 HBD
percent_hbd10,000
post_id4,819,113
net_rshares0
@krystiangraba ·
Szczerze mówiąc to niezbyt dużo, traktuje go jako wstęp do nauki programowania i zaznajomienia się z tematem.
👍  ,
properties (23)
authorkrystiangraba
permlinkre-lukmarcus-re-krystiangraba-programowanie-w-pascalu-1-20170615t105221688z
categorypolish
json_metadata{"tags":["polish"],"app":"steemit/0.1"}
created2017-06-15 10:52:21
last_update2017-06-15 10:52:21
depth2
children3
last_payout2017-06-22 10:52:21
cashout_time1969-12-31 23:59:59
total_payout_value0.000 HBD
curator_payout_value0.000 HBD
pending_payout_value0.000 HBD
promoted0.000 HBD
body_length109
author_reputation152,792,969,246
root_title"Programowanie w Pascalu [#1]"
beneficiaries[]
max_accepted_payout1,000,000.000 HBD
percent_hbd10,000
post_id4,909,865
net_rshares457,902,683
author_curate_reward""
vote details (2)
@lukmarcus ·
To nie lepiej zacząć od czegoś, co można od razu wykorzystać w praktyce, zamiast uczyć się, żeby się uczyć?
properties (22)
authorlukmarcus
permlinkre-krystiangraba-re-lukmarcus-re-krystiangraba-programowanie-w-pascalu-1-20170615t105626640z
categorypolish
json_metadata{"tags":["polish"],"app":"steemit/0.1"}
created2017-06-15 10:56:12
last_update2017-06-15 10:56:12
depth3
children2
last_payout2017-06-22 10:56:12
cashout_time1969-12-31 23:59:59
total_payout_value0.000 HBD
curator_payout_value0.000 HBD
pending_payout_value0.000 HBD
promoted0.000 HBD
body_length107
author_reputation6,879,451,798,530
root_title"Programowanie w Pascalu [#1]"
beneficiaries[]
max_accepted_payout1,000,000.000 HBD
percent_hbd10,000
post_id4,910,075
net_rshares0
@noisy ·
osobiście jednak polecałbym bardziej użyteczny język, jakim jest python. Do nauki jest w sam raz (prosta składnia), a jego użyteczność jest niesamowita (można w nim praktycznie robić wszystko, gry, aplikacje, strony internetowe, skrypty, etc).

Innymi słowy, osoba ucząca się pythona od razu uczy się czegoś co może jej się przydawać cały czas. Mam wrażenie że Pascal ma obecnie wartość bardziej akademicką niż produkcyjną.
👍  
properties (23)
authornoisy
permlinkre-krystiangraba-programowanie-w-pascalu-1-20170613t222802958z
categorypolish
json_metadata{"tags":["polish"],"app":"steemit/0.1"}
created2017-06-13 22:28:03
last_update2017-06-13 22:28:03
depth1
children0
last_payout2017-06-20 22:28:03
cashout_time1969-12-31 23:59:59
total_payout_value0.000 HBD
curator_payout_value0.000 HBD
pending_payout_value0.000 HBD
promoted0.000 HBD
body_length423
author_reputation59,974,373,499,600
root_title"Programowanie w Pascalu [#1]"
beneficiaries[]
max_accepted_payout1,000,000.000 HBD
percent_hbd10,000
post_id4,772,402
net_rshares436,722,423
author_curate_reward""
vote details (1)
@piotras ·
$0.32
Dobra robota :D przypomniałeś mi czasy technikum 1 klasa i turbo pascal na lekcjach :D
👍  ,
properties (23)
authorpiotras
permlinkre-krystiangraba-programowanie-w-pascalu-1-20170613t174117853z
categorypolish
json_metadata{"tags":["polish"],"app":"steemit/0.1"}
created2017-06-13 17:41:21
last_update2017-06-13 17:41:21
depth1
children0
last_payout2017-06-20 17:41:21
cashout_time1969-12-31 23:59:59
total_payout_value0.318 HBD
curator_payout_value0.000 HBD
pending_payout_value0.000 HBD
promoted0.000 HBD
body_length86
author_reputation434,677,846,131
root_title"Programowanie w Pascalu [#1]"
beneficiaries[]
max_accepted_payout1,000,000.000 HBD
percent_hbd10,000
post_id4,751,080
net_rshares12,562,889,483
author_curate_reward""
vote details (2)
@rooby ·
Dzięki za wpis. Pascal ma już swoje lata i niestety nie jest najprostrzy na początek, ale myśle że warto o tym wiedzieć.
👍  
properties (23)
authorrooby
permlinkre-krystiangraba-programowanie-w-pascalu-1-20170613t113225998z
categorypolish
json_metadata{"tags":["polish"],"app":"steemit/0.1"}
created2017-06-13 11:32:27
last_update2017-06-13 11:32:27
depth1
children0
last_payout2017-06-20 11:32:27
cashout_time1969-12-31 23:59:59
total_payout_value0.000 HBD
curator_payout_value0.000 HBD
pending_payout_value0.000 HBD
promoted0.000 HBD
body_length120
author_reputation962,075,808,206
root_title"Programowanie w Pascalu [#1]"
beneficiaries[]
max_accepted_payout1,000,000.000 HBD
percent_hbd10,000
post_id4,727,530
net_rshares229,915,814
author_curate_reward""
vote details (1)
@steemitboard ·
Congratulations @krystiangraba! You have completed some achievement on Steemit and have been rewarded with new badge(s) :

[![](https://steemitimages.com/70x80/http://steemitboard.com/notifications/voted.png)](http://steemitboard.com/@krystiangraba) Award for the number of upvotes received

Click on any badge to view your own Board of Honnor on SteemitBoard.
For more information about SteemitBoard, click [here](https://steemit.com/@steemitboard)

If you no longer want to receive notifications, reply to this comment with the word `STOP`

By upvoting this notification, you can help all Steemit users. Learn how [here](https://steemit.com/steemitboard/@steemitboard/http-i-cubeupload-com-7ciqeo-png)!
👍  
properties (23)
authorsteemitboard
permlinksteemitboard-notify-krystiangraba-20170613t184300000z
categorypolish
json_metadata{"image":["https://steemitboard.com/img/notifications.png"]}
created2017-06-13 16:43:00
last_update2017-06-13 16:43:00
depth1
children0
last_payout2017-06-20 16:43:00
cashout_time1969-12-31 23:59:59
total_payout_value0.000 HBD
curator_payout_value0.000 HBD
pending_payout_value0.000 HBD
promoted0.000 HBD
body_length704
author_reputation38,975,615,169,260
root_title"Programowanie w Pascalu [#1]"
beneficiaries[]
max_accepted_payout1,000,000.000 HBD
percent_hbd10,000
post_id4,747,187
net_rshares199,382,027
author_curate_reward""
vote details (1)
@tongokongo ·
Pascal! Mój pierwszy język :D Do dziś pamiętam czasy gimnazjum jak prowadzącemu zajęcia z informatyki opadła szczęka gdy przyniosłem na dyskietce program napisany w pascalu, z grafiką, menu i przyciskami, w którym zawarty był materiał z całego roku informatyki. Good times.
👍  ,
properties (23)
authortongokongo
permlinkre-krystiangraba-programowanie-w-pascalu-1-20170615t102137715z
categorypolish
json_metadata{"tags":["polish"],"app":"steemit/0.1"}
created2017-06-15 10:21:42
last_update2017-06-15 10:21:42
depth1
children2
last_payout2017-06-22 10:21:42
cashout_time1969-12-31 23:59:59
total_payout_value0.000 HBD
curator_payout_value0.000 HBD
pending_payout_value0.000 HBD
promoted0.000 HBD
body_length273
author_reputation187,266,204,888
root_title"Programowanie w Pascalu [#1]"
beneficiaries[]
max_accepted_payout1,000,000.000 HBD
percent_hbd10,000
post_id4,908,257
net_rshares543,369,335
author_curate_reward""
vote details (2)
@krystiangraba ·
Heh, pewnie jeszcze za czasów kompilatora w postaci "Free Pascal"? Jeżeli tak to gratuluje wytrwałości
👍  , ,
properties (23)
authorkrystiangraba
permlinkre-tongokongo-re-krystiangraba-programowanie-w-pascalu-1-20170615t105254422z
categorypolish
json_metadata{"tags":["polish"],"app":"steemit/0.1"}
created2017-06-15 10:52:54
last_update2017-06-15 10:52:54
depth2
children1
last_payout2017-06-22 10:52:54
cashout_time1969-12-31 23:59:59
total_payout_value0.000 HBD
curator_payout_value0.000 HBD
pending_payout_value0.000 HBD
promoted0.000 HBD
body_length102
author_reputation152,792,969,246
root_title"Programowanie w Pascalu [#1]"
beneficiaries[]
max_accepted_payout1,000,000.000 HBD
percent_hbd10,000
post_id4,909,888
net_rshares788,704,025
author_curate_reward""
vote details (3)
@tongokongo ·
Chyba to był Borland Pascal. Jezu, serio wtedy myślałem że jestem dobrym programistą xD
properties (22)
authortongokongo
permlinkre-krystiangraba-re-tongokongo-re-krystiangraba-programowanie-w-pascalu-1-20170615t114053918z
categorypolish
json_metadata{"tags":["polish"],"app":"steemit/0.1"}
created2017-06-15 11:40:57
last_update2017-06-15 11:40:57
depth3
children0
last_payout2017-06-22 11:40:57
cashout_time1969-12-31 23:59:59
total_payout_value0.000 HBD
curator_payout_value0.000 HBD
pending_payout_value0.000 HBD
promoted0.000 HBD
body_length87
author_reputation187,266,204,888
root_title"Programowanie w Pascalu [#1]"
beneficiaries[]
max_accepted_payout1,000,000.000 HBD
percent_hbd10,000
post_id4,912,586
net_rshares0