Дан массив a(10) упорядочить элементы,массива по возрастанию. дан массив а(6) определить количество положительных элементов дан массив а(7)найдите количество четных четных положительных элементов дан массив а(8) найдите найдите сумму нечетных положительных элементов (составить программу на бейсике)

259

405

Посмотреть ответы 2

Ответы на вопрос:

1234567890825

Информатика

4,5(32 оценок)

По поводу первой не уверен в правильности во всех программах подразумевается, что массив уже создан и заполнен cls for i = 1 to 10 for j = 1 to 10 if a(j)> a(j+1) then c=a(j) a(j)=a(j+1) a(j+1)=c end if next j next i cls for i = 1 to 6 if a(i)> 0 then k=k+1 end if next i print k cls for i = 1 to 7 if a(i)> 0 and a(i) mod 2 =0 then k=k+1 end if next i print k cls for i = 1 to 7 if a(i)> 0 and a(i) mod 2 < > 0 then k=k+1 end if next i print k