endif -hla

program lab;

    #include("stdlib.hhf")
    static
 		tab: int32[256];
		i: int32:=1;

procedure zero;

	var
		a:int32;

begin zero;

	stdout.newln();
	stdout.put("Podaj od ktorego elementu tablica ma sie zerowac:");
	stdin.geti32();

	for(mov(eax,ecx);ecx<256;inc(ecx))do
		mov(0,tab[ecx*4]);
		exitif(ecx==200) zero;
	endfor;

end zero;

begin lab;

	for(mov(0,ecx);ecx<256;inc(ecx))do
		mov(i,tab[ecx*4]);
		inc(i);
	endfor;

	for(mov(0,ecx);ecx<256;inc(ecx))do
		stdout.put(tab[ecx*4]:5);
	endfor;

	zero();

	stdout.newln();

	for(mov(0,ecx);ecx<256;inc(ecx))do
		stdout.put(tab[ecx*4]:5);
	endfor;

end lab;