Надо перевести маленькую програму с Паскаля на С

[OnixSonic]

Сам только начало программы немного написал (возможно не правильно), а так язык только начал учить даже простую основу не знаю(.
Program matem;
uses crt;
var n,j :integer;
b:array [1..5] of integer;
BEGIN
clrscr;
readln(n);
for j:=1 to n do
readln (b[j]);
for j:=1 to n do
if (b[j] mod 2=0) then
if ((b[j] div 2) mod 2=1) then
writeln (b[j]);
writeln;
END.

[rUs_LAN]

int main()
{
      int n, j;
	  int b[5];
	  system("cls");
	  cout << n;
	  for(j = 1; j < n; j++) cin >> b[j];
	  for(j = 1; j < n; j++) 
	  {
		  if(b[j] % 2 == 0)
			  if((b[j] / 2) % 2 == 1) cout << b[j] << endl;
	  }
	  cout << endl;
	  system("pause");
}

както так

[OnixSonic]

Спасибо завтра проверю.

Кстати никото не подскажет где можно скачать видеоуроки С?