Подсчитать количество отрицательных чисел из 10 введенных с клавиатуры

Program n1; var a,i,k: integer; begin k: =0; for i: =1 to 10 do begin write('введите ',i,' число: '); readln(a); if a< 0 then k: =k+1; end; write('количество: ',k); end.

#include < iostream> int main() {       int k, i, t;       k=0;       for (i=1; i< =10; i++) {               std: : cin> > t;               if (t< 0) {k+=1; }       }       std: : cout< < k; }

writeln('a[',i,']=',a[i]);

readln;

end.