a[900];		b;c;d=1		;e=1;f;		g;h;O;		main(k,
l)char*		*l;{g=		atoi(*		++l);		for(k=
0;k*k<		g;b=k		++>>1)		;for(h=		0;h*h<=
g;++h);		--h;c=(		(h+=g>h		*(h+1))		-1)>>1;
while(d		<=g){		++O;for		(f=0;f<		O&&d<=g
;++f)a[		b<<5|c]		=d++,b+=	e;for(		f=0;f<O
&&d<=g;		++f)a[b		<<5|c]=		d++,c+=		e;e= -e
;}for(c		=0;c<h;		++c){		for(b=0		;b<k;++
b){if(b		<k/2)a[		b<<5|c]		^=a[(k		-(b+1))
<<5|c]^=	a[b<<5		|c]^=a[		(k-(b+1		))<<5|c]
;printf(	a[b<<5|c	]?"%-4d"	:"    "		,a[b<<5
|c]);}		putchar(	'\n');}}	/*Mike		Laman*/

a[900];//тут компилятор сразу ругается, предполагаю что в 1984 если не указывалчся тип данных, по умолчанию был
//например char. Хотя Си обладал явной типзацией ? Или нет.
b;
c;
e = 1;
f;
g;
h;
O;


int main(k,char** l)
{
	{
		g = atoi(*++l); //второй параметр(после имени программы) на входе увеличенный на 1. Целое число
		for (k = 0; k*k < g; b = k++ >> 1);
	}
}

b = k++ >> 1

(k>>1)+1

for (h = g; ++h);

#include <stdlib.h>
#include <stdio.h>

int a[900];//тут компилятор сразу ругается, предполагаю что в 1984 если не указывалчся тип данных, по умолчанию был
//например char. Хотя Си обладал явной типзацией ? Или нет.
int b;
int c;
int d = 1;
int e = 1;
int f;
int g;
int h;
int O;


int main(int k, char** l)
{
	g = atoi(*++l);		
	for (k =0; k*k<	g; b = k++ >> 1); 
	for (h = 0; h*h <=g; ++h);		
	--h; 
	c = ((h += g>h*(h + 1)) - 1) >> 1;
	
	while (d <= g)
	{
		++O; 
		for (f = 0; f<O&&d <= g; ++f)
			a[b << 5 | c] = d++,b += e; 
		for (f = 0; f<O&&d <= g;++f)
			a[b << 5 | c] = d++, c += e; 
		e = -e;
	}

	for (c = 0; c<h; ++c)
	{
		for (b = 0; b<k; ++b)
		{
			if (b<k/2) a[b << 5 | c] ^= a[(k - (b + 1))<< 5 | c] ^= a[b << 5 | c] ^= a[(k - (b + 1)) << 5 | c]; 
			printf(a[b << 5 | c] ? "%-4d" : "    ", a[b <<5|c]);
		}		
		putchar('\n');
	}
}

	g = atoi(*++l);//считываем в второй параметр из строки аргументов (1 параметр - имя программы)		
	for (k = 0; k*k< g; b = k++ >> 1);//k ближайший целый корень из числа на входе программы. b=(k-1-(k-1)%2)/2 
	//Две строчки ниже можно заменить на h=k-1
	//h=k-1
	for (h = 0; h*h <=g; ++h);		
	--h;

	//(g>h*(h + 1)) ? h++ : false;
	//c = (h - 1) >> 1;
	c = ((h += g>h*(h + 1)) - 1) >> 1;//Корректировки над h, инициализация с. Я бы заменил эту строчку двумя строчками выше

	while (d <= g)
	{
		++O; 
		for (f = 0; f < O && d <= g; ++f)
		{
			a[b << 5 | c] = d++, b += e;
		}
		for (f = 0; f<O && d<=g;++f)
			a[b << 5 | c] = d++, c += e; 
		e = -e;
		printf("O=%i \n", O);
	}

a[b << 5 | c] = d++, b += e;

	while (d <= g)
	{
		++O;
		for (f = 0; f < O && d <= g; ++f)
		{
			a[b << 5 | c] = d++;
			b += e;
		}
		for (f = 0; f < O && d <= g; ++f)
		{
			a[b << 5 | c] = d++;
			c += e;
		}
		e = -e;
		//printf("O=%i b=%i c=%i e=%i\n", O,b,c,e);
	}

	g = atoi(*++l); 		
	//k = sqrt(g) в большую сторону. b=(k-1-(k-1)%2)/2 
	for (k = 0; k*k< g; k++);//количество столбцов
	b = (k - 1) >> 1;

	(g>(k - 1)*k) ? h = k : h = k - 1;//количество строк
	c = (h - 1) >> 1;

int tr1(int x, int y)
{
	return (x << 5 | y);
}

	while (d <= g)
	{
		++O;
		for (f = 0; f < O && d <= g; ++f)
		{
			a[tr1(b, c)] = d++;
			b += e;
		}
		for (f = 0; f < O && d <= g; ++f)
		{
			a[tr1(b,c)] = d++;
			c += e;
		}
		e = -e;
	}

if (b<k/2) a[b << 5 | c] ^= a[(k - (b + 1))<< 5 | c] ^= a[b << 5 | c] ^= a[(k - (b + 1)) << 5 | c]; 

a[b << 5 | c] ^= a[(k - (b + 1))<< 5 | c]

a[b << 5 | c]