Исправить ошибки и написать блок-схему. : имеется массив а из n произвольных чисел, среди которых есть положительные, отрицательные и равные нулю. используя оператор цикла, составить программу, вычислить количество положительных и нулевых и сумму отрицательных. листинг программы: program massiv; const n=10; var a: array [1..4] of integer; i, c, c2, c3: integer; begin for i=1 to n do begin readln (a[i]); if (a[i]=0 then inc(c) else if ([ai]< 0) then inc(c2) else inc (c3); end; writeln (`нулевые: `,c); writeln (`отрицательные: `,c2); writeln (`положительные: `,c3); end.

fyz070504    3   21.05.2019 23:10    1