Linia programu | Opis | Blok algorytmu |
1 | Każdy program w pascalu musi się zaczynać słowem kluczowym program poprzedzającym nazwę programu, nie wnosi nic do realizacji algorytmu. | - |
3 - 15 | Deklarujemy i definiujemy procedurę liniowe, realizującą algorytm rozwiązywania równania liniowego. | 4 |
17 | Deklarujemy wszystkie używane w programie głównym zmienne. W pascalu musimy to zrobić przed słowem kluczowym begin, rozpoczynającym część operacyjną kodu. | - |
18 | Początek kodu programu. | 1 |
19 - 24 | Wypisujemy na ekranie komunikaty zachęty dla użytkownika i wczytujemy wprowadzone przez niego wartości współczynników a, b i c do odpowiednich, wcześniej zadeklarowanych, zmiennych. | 2 |
25 | Sprawdzamy, czy współczynnik a jest równy 0. Jeśli tak mamy do czynienia z równaniem liniowym. | 3 |
26 | W tej linii znajdziemy się tylko wtedy, gdy a = 0, czyli gdy równanie jest równaniem liniowym. Wywołujemy procedurę liniowe(b, c), realizującą algorytm rozwiązywania równania liniowego. Warto zwrócić uwagę, że współczynnik przy pierwszej potędze zmiennej x oznaczony jest symbolem b, a wyraz wolny - c (tradycyjnie w równaniu liniowym używa się odpowiednio a i b). | 4 |
27 | else, czyli w przeciwnym przypadku. W tym miejscu rozpoczyna się rozwiązanie równania, gdy a ≠ 0, czyli gdy faktycznie mamy do czynienia z równaniem kwadratowym. | - |
28 | Obliczamy wartość zmiennej delta. | 5 |
29 | Sprawdzamy czy delta < 0. | 6 |
30 | Gdy delta < 0 wypisujemy odpowiedni komunikat o braku rozwiązań. | 7 |
31 | Tutaj rozpoczyna się blok programu realizowany gdy delta nie jest mniejsza od zera, czyli gdy równanie posiada rozwiązania (jedno lub dwa). | - |
32 | Sprawdzamy czy delta = 0. | 8 |
33 | Obliczamy i zapisujemy w zmiennej x rozwiązanie równania (jedno, podwójne - delta = 0). | 9 |
34 | Wyświetlamy obliczony wynik. | 10 |
35 | Rozpoczynamy blok programu realizowany w sytuacji gdy nie był spełniony warunek delta = 0 (oraz wcześniejsze delta < 0 i a ≠ 0). | - |
36 - 37 | Obliczamy rozwiązania i ich wartości przypisujemy do zmiennych x1 i x2. | 11 |
38 - 39 | Wyświetlamy obliczony wynik - dwa rozwiązania równania kwadratowego. | 12 |
40 - 41 | Zamykamy bloki instrukcji złożonych. | - |
42 | Koniec realizacji programu. | 13 |