Дан массив a(10) упорядочить элементы,массива по возрастанию.Дан массив А(6) определить количество положительных элементовДан массив А(7)найдите количество четных четных положительных элементовдан массив а(8) найдите найдите су...
Дан массив a(10) упорядочить элементы,массива по возрастанию.
Дан массив А(6) определить количество положительных элементов
Дан массив А(7)найдите количество четных четных положительных элементов
дан массив а(8) найдите найдите сумму нечетных положительных элементов
(Составить программу на бейсике) СРОЧНО
Гость
Ответ(ы) на вопрос:
ГостьПо поводу первой задачи не уверен в правильности
Во всех программах подразумевается, что массив уже создан и заполнен
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
Не нашли ответ?
Похожие вопросы