[PASCAL] Własna procedura "Inc"

Próbowałem napisać własną procedurę “Inc”, za nic mi to nie wychodzi. Używałem wskaźników, wszystkiego co możliwe - a nie działa :frowning:

Mógłby mnie ktoś wesprzeć kodem? :stuck_out_tongue:

procedure xinc(var X:Integer);overload; begin X:=X+1; end;

procedure xinc(var X:Integer;Y:Integer);overload; begin X:=X+Y; end;

procedure xinc(var X:Word);overload; begin X:=X+1; end;

procedure xinc(var X:Word;Y:Word);overload; begin X:=X+Y; end;

itd.

procedure xxinc(x:byte);

begin

x:=x+1;

write(x);

end;

Coś takiego :wink: Oczywiście to tylko przykład który musisz sam przeanalizować aby działał w twoim programie

Nie sprawdzałem czy działa bo pisałem go tu i nie mam zainstalowanego kompilatora :wink:

demistrakos , od kiedy pascalowska funkcja inc() wyświetla coś na ekran?

Nie wspominam już o dziwnej operacji:

Nie miałem na celu wykonać z niego prace domową i dać mu od razu gotowca tylko go nakierować i pomóc w rozwiązaniu jego problemu :wink:

Dzięki alex, nie wpadł bym na to var.

EDIT: To nie praca domowa.