[Pascal] Parzystość liczb

[Pulpit 4]

Pomijając fakt iż uczenie się pascala jest dla mnie aburdem i nieporozumieniem, to nie mam wyboru. Męczę się z banalnym zadaniem, które ma sprawdzać czy dana liczba jest parzysta lub nie. Mam to zrobić w oparciu o

function nopar(x:longint):boolean;

Schody się zaczynają gdy zaczynam kombinować, bo za cholerę nie wiem jak w pascalu funkcja zwraca wartość Mój kod wygląda tak

program zad3;
uses crt;

var x:longint;

function nopar(x:longint):boolean;
begin
	if (x MOD 2 == 0) nopar := 1
	else nopar := 0;
end;

begin
 clrscr;
 writeln('Podaj liczbe: ');
 readln(x);
 nopar(x);
 if nopar(x) == 1 then writeln('Parzysta')
 else writeln('Nieparzysta');

 repeat until keypressed;
end.

I sypie mi błędem

8 / 24 zadanie3.pas

Error: Illegal expression

Czyli w spraedzaniu czy x jest podzielne przez 2. Czy ktoś może mi wyjaśnić jak funkcja zwraca wartość w pascalu? Gdzie powinienem poprawić kod żeby działało

[Deadeye 0]

Prawie dobrze Tylko operator porównania w pascalu to pojedyńcze =, nie podwójne, a wartość boolean powinno się zwracać przez true albo false, a nie 0 i 1. Samo przypisanie do wartości funkcji masz dobrze.

[iksmodiw 0]

Funkcja zwraca wartość przez nazwę.I warunek idzie tak: if {wyrażenie} then {wyrażenie} else {wyrażenie}.

[moonraker 0]

tak jak napisał Deadeye, w pascalu porównanie to nie == jak w C, tylko samo =