C++ :

#include<stdio.h>
#include<stdlib.h>
int main()
{
	for(int i=2;i<=100;i+=2)
		printf("%d\n",i);
	return 0;
}

Pascal :

var i:integer;
begin
  for i:=1 to 100 do
    if i mod 2=0 then writeln(i);
  
end.