C :

#include<stdio.h>

int main()
{
	int i;
	i=0;
	L1:
		printf("%d\n",i);
	    i=i+1;
	if(i<10){
		goto L1;
	}
	return 0;
}

Pascal :

var i:longint;
begin
  for i:=0 to 9 do
  writeln(i);
end.