Заполнить массив случайными числами в интервале [20,100] и подсчитать отдельно число чётных и нечётных элементов. Кумир.

Question

Информатика

Персий

10 февраля, 09:21

Заполнить массив случайными числами в интервале [20,100] и подсчитать отдельно число чётных и нечётных элементов. Кумир.

+1

Ответы (1)

Знаете ответ на вопрос?

Пасс · Answer 1

алг

нач

цел count, i, count1

целтаб A[1:10]

нц для i от 1 до 10

A[i]:=irand (20, 100)

вывод A[i], " "

кц

вывод " ", нс

count:=0

count1:=0

нц для i от 1 до 10

если mod (A[i], 2) = 0

то count:=count+1

иначе count1:=count1+1

все

кц

вывод "четных ", count, нс, "нечетных ", count1

кон