program te; var I : InTEGER; a_B, z: ReAl; b: array [0..2] of integer; zzz : boolean; begin i := 1; for i := 11 downto 0 do writeln(paramcount); end.