Составить программу, которая создает массив C из N случайных элементов из…

Uses crt; const n=10; var c: array[1… n] of integer; i,s: integer; beginrandomize; s: =0; for i: =1 to n dobeginc[i]: =random (121) -70; writeln (c[i]); if c[i]<0 then s: =s+c[i]; end; writeln; writeln (s); end.