Ответ:

алг

нач

цел 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

кон