Дан одномерный массив J из N элементов ,значения которых находятся в диапазоне от -90 до 90 подсчитать кол-во положительных элементов .Вывести на экран исходный массив и результат подсчёта .Программа бейсик
Дан одномерный массив J из N элементов ,значения которых находятся в диапазоне от -90 до 90 подсчитать кол-во положительных элементов .Вывести на экран исходный массив и результат подсчёта .Программа бейсик
Гость
Ответ(ы) на вопрос:
ГостьDIM J(1 TO 20) AS INTEGER
i%=0
RANDOMIZE TIMER
P%=0
CLS 'Очистить экран
FOR i%=1 TO 20
J(i%)=INT(180*RND)-90 'Случайное целое на [-90,90]
PRINT J(i%)
IF J(i%)>0 THEN P%=P%+1
NEXT
PRINT "Количество положительных элементов",P%
END
Не нашли ответ?
Похожие вопросы