Напишите и отладьте в среде программирования PascalABC.Net программы которых осуществляется ввод целых чисел(ввод осуществляется до тех пор, пока не будет введен ноль) и подсчет введённых положительных и отрицательных чисел:
А) использую оператор Repeat
Б) используя оператор while
С) используя оператор for, если известно что будет введено 12 таких чисел сделайте. Я в этом вообще не шарю.
6 задание на фото​

Var 
a: array[1..n] of integer; 
k, i, m: byte; 
min: integer;

begin 
Write('Razmer massiva: '); 
Readln(k); 
if (k < 0) or (k > 100) then     
begin       
Writeln('Razmer dolzhen byt bolshe 0 i menshe 100');       
Readln;       
Exit;     
end; 
Randomize; 
Writeln('Ishodn. massiv: '); 
for i:=1 to k do     
begin       
a[i]:=Random(101)-50;       
write(a[i]:4);     
end; 
min:=a[1]; 
for i:=2 to k do   
if a[i] < min then       
begin         
min:=a[i];         
m:=i;       
end; 
a[m] := a[1]; 
a[1] := min; 
Writeln; 
Writeln('Min element = ', min:4, ' v posicii ', m:3); 
Writeln('Rezult. massiv: '); 
for i:=1 to k do     
write(a[i]:4); 
readln;
end.

Объяснение:

Микрофо́нный эффе́кт — нежелательное явление, при котором некоторая часть электрической цепи воспринимает звуковые колебания и вибрацию подобно микрофону. Является источником помех. Чаще всего возникает при изменении ёмкости, особенно в высокочастотных цепях, где даже незначительные колебания плохо закреплённых деталей могут существенно повлиять на параметры прохождения основного сигнала. Также источником этого явления могут быть:

Электронные лампы, при колебаниях электродов меняющие свои параметры.

В керамических конденсаторах нередко применяется диэлектрик, который обладает пьезоэффектом.

Воспроизводящая магнитная головка магнитофона — наличие паразитного постоянного магнитного поля от окружающих деталей лентопротяжного механизма приводит к тому, что вибрация обмотки магнитной головки возбуждает в ней дополнительную ЭДС.

Головка звукоснимателя электрофона может воспринимать вибрации, создаваемые электродвигателем ЭПУ.

Электромагнитный звукосниматель электрогитары может воспринимать вибрации корпуса инструмента и колебания воздуха, что может привести к возникновению лишних призвуков и нежелательной акустической обратной связи со звукоусиливающей аппаратурой.

Плохой электрический контакт в разъёмах.