Question

Заполнить массив случайными числами в интервале [-2,2] и подсчитать количество положительных элементов. На языке КУМИР

Answer 1

Алг массив
нач
  цел N = 10
  целтаб a[1:N]
  цел i, k
 
  нц для i от 1 до N
    a[i] := irnd(-2,2)
    вывод a[i], " "
  кц
  вывод нс

  k:=0
  нц для i от 1 до N
    если a[i] > 0 то
      k:=k+1
    все
  кц
  вывод "k = ",k
кон