Question

4. Wklej źródło programu opisz komentarzami (jak w pascalu ) każdą linię programu.

Answer 1

lol, co to jest? Turbo Pascal? A chociaż legalny, czy bezczelnie spiracony? :|
Jeżeli masz jakiś wybór, polecam skorzystać z *darmowego* i ****znacznie*** lepszego* kompilatora FPC wraz ze środowiskiem Lazarus.

Część właściwa:
`program dane;` - standard języka Pascal narzuca, by pierwsze słowo kluczowe było: `program`, `unit` lub `library` + nazwa, lub słowa tego może nie być - wtedy tryb kompilacji przełączany jest na `program`. Na tej podstawie wykrywa się, w jaki sposób dany plik ma zostać skompilowany.
`var` początek scope deklaracji zmiennych.
`imie, numer: string;` stworzenie zmiennej `imie` typu `string` oraz irracjonalnie nielogicznej zmiennej `numer` typu `string` (de facto liczba powinna być liczbą, nie ciągiem znaków, to jest pogwałcenie zasad dobrego pisania kodu).
`begin` w tym wypadku początek części właściwej programu.
`write('Podaj ....');` - wyświetlenie tekstu na standardowym wyjściu.
`readln(imie);` wczytanie tekstu ze standardowego wejścia i zapisanie go do zmiennej `imie`
Następne dwie linijki robią to samo, tylko że wyświetlany jest inny tekst, oraz wczytywane dane są do zmiennej `numer`.
Dalej mamy znowu wyświetlenie tekstu na stdout, a potem kolejną bezsensowność:
```
write('Twoj numer buta to: ');
writeln(numer);
```
Ten kod jest równoważny temu:
`writeln('Twoj numer buta to: ', numer);`
I wyświetla na stdout dany tekst oraz wartość zmiennej.
Dalej mamy bezsensowne `readln;`, bo ludzie są zbyt leniwi, by samemu skonfigurować środowisko, by przytrzymywało konsolę po zakończeniu działania programu oraz nie rozumieją idei programów konsolowych.
Ostatnia linijka to `end.` - oznacza koniec aktualnego bloku, i w tym wypadku również i koniec całego programu.

#Note: jeżeli tak kogokolwiek uczą Pascala, to naprawdę współczuję <*>