C :

#include "stdio.h"
main()
{
	int i,j,a,b,n;
	scanf("%d",&n);
	if(n<=100&&n>0&&n%2==0)
	{
		printf("%d\n",n);
		for(i=0;i<n;i++)
		{
			for(j=0;j<=i;j++)
			{
				if(i%2==0)
					printf("0");
				else
					printf("1");
			}
			for(;j<n;j++)
			{
				if(i%2==0)
					printf("1");
				else
					printf("0");
			}
			printf("\n");
		}
	}
}

C++ :

#include<stdio.h>
#define max 100
int main()
{
	int a[max+5];
	int n;
	scanf("%d",&n);
	for (int i=0;i<n;i++)
	{
		a[i]=0;
	}
	printf("%d\n",n);
	for (int i=0;i<n;i++)
	{
		for (int j=0;j<n;j++)
		{
			if (i!=j)
			{
				a[j]=(a[j]+1)%2;	
			}
			printf("%d",a[j]);
		}
		printf("\n");
	}
	return 0;
}

Pascal :

var n,i,j:longint;    a:array[1..500] of longint;begin read(n); writeln(n); for i:=1 to n do begin  for j:=1 to n do if i<>j then   if a[j]=0 then a[j]:=1 else a[j]:=0;  for j:=1 to n do write(a[j]);  writeln; end;end.