INC

Untuk menambah angka dengan angka 1.atau angka lainsesuai dengan kenaikan yang diinginkan. Ini sama dengan rumus x:=x+1.

Bentuk umum:

Inc(x) sama dengan x:=x+1;

Inc(x,2); sama dengan x:=x+2;

Inc(x,3); sama dengan x:=x+3;

Dan seterusnya.

Contoh

Uses crt;

Var i:integer;

Begin

Clrscr;

I:=0;

Repeat 

INC(I);

Writeln(i);

Until I=21;

Readln;

End.

Kembali ke Contoh Program Turbo Pacal