Напечатать в обратном порядке все положительные элементы массива - QBasic

Формулировка задачи:

Имеется массив A и N произвольных чисел A (N), среди которых есть положительные, отрицательные и равные нулю. Составить программу которая напечатает в обратном порядке все положительные элементы. Например, если A= {2,4-9,5,6,-3,2}, результат: 2,6,5,4,2. Программирование через qbasic. Подскажите пожалуйста!

Код к задаче: «Напечатать в обратном порядке все положительные элементы массива - QBasic»

textual
input "vvedite kol-vo elementov ",n
dim a(n)
randomize timer
for i=1 to n 
a(i)=int(rnd*20)-10
next
print"massiv"
for i=1 to n 
print a(i);
next
print
print "resultat"
for i= n to 1 step-1
if a(i)>0 then print a(i);
next
Эта работа вам не подошла?

Вы всегда можете заказать любую учебную работу у наших авторов от 20 руб.

11   голосов, оценка 4.182 из 5


СДЕЛАЙТЕ РЕПОСТ