Помогите составить программу в Паскале, пожалуйста

Помогите составить программу в Паскале, пожалуйста.
При выплате зарплаты из нее вычитается подоходный налог следующим образом: с зарплаты менее 120 р. подоходный налог не взимается, с зарплаты > 10000 - 20%, с остальных - 12%. Составьте программу, с помощью которой по окладу вычислялся бы подоходный налог и сумма денег к выплате.

Это какой то капец. Буду очень благодарна за помощь.

  • var a,b,c:array[1..1000] of real;
    i,n:integer;
    s:real;
    begin
    readln(n); {Вводим количество работников}
    for i:=1 to n do
    readln(a); {Вводим зарплаты}
    For i:=1 to n do
    if a
    <120 then b:=a else if a>10000 then b:=a*0.20 else b:=a*0.12
    s:=0;
    For i:=1 to n do begin
    writeln(b
    ); {Выводим налоги}
    s:=s+a
    -b;
    end;
    writeln(a
    -b); {Выводим зарплаты c учетом вычета налогов}
    writeln(s);{Сумма денег к выплате}
    end.