Podatek należy obliczyć w następujący sposób: od dochodu należy odjąć kwotę wolną od podatku i następnie pomnożyć przez stawkę procentową.
program cw3_13;
{ Program wyświetla wartość podatku w 2005 od kwoty dochodu 5000 zl. }
{ Katalog r3_04 : 3_13.pas }
const
KwotaDoOdjęcia - 530.08;
StawkaProcentowa - 0.19; { czyli 19 procent }
begin
Writeln ('Podatek od 5000 zl to:
5000*StawkaProcentowa-KwotaDo0djecia:6:2);
end.
Dane dla instrukcji Writeln zostały podzielone w tekście programu na dwa wiersze. Nie ma to żadnego znaczenia dla działania programu.
Obserwuj zmianę wyniku wraz ze zmianą wartości stałych. Czy lepsza dla podatnika w pierwszej grupie byłaby zmiana wartości kwoty wolnej, czy stawki procentowej? Wstaw w programie drugą instrukcję, wypisującą podatek dla dochodu 10 000 zł. Gdybyś chciał wpisać większe wartości pamiętaj, że maksymalna wartość dla pierwszego progu wynosi 37 024 zł.
Zauważ, że zmiana wartości stałych ma wpływ na wynik wszystkich wyrażeń na niej opartych.
Jako stałe możesz definiować nie tylko liczby, ale także teksty.
MCI!
program cw3_14;
{ Program wyświetla zapamiętane w stałych imię i nazwisko. }
{ Katalog r3_04 : 3_14.pas }
const
Imię = 'Andrzej';
Nazwisko = 'Kierzkowski';
begin
Writeln (Imię, * Nazwisko); end.
Drugi element instrukcji Writeln wypisuje spację dzielącą imię od nazwiska. Spróbuj, jak zmienia się wynik działania programu po zmianie wartości stałych.
Nie sposób wyobrazić sobie pisania programów bez wykorzystania zmiennych. Można je sobie wyobrazić jako pojemniki, przechowujące dane w trakcie wykonania programu. Zmienne posiadają swoje nazwy, poprzez które można odwoływać się do ich zawartości. Muszą zostać zadeklarowane w bloku deklaracji w sekcji var. Po tym słowie kluczowym można je definiować, posługując się postacią nazwa : typ. Kolejne deklaracje należy oddzielać średnikami. Oto przykład: