Одномерный массив

@Екатеринка19 · Регистрация: 12.01.2011

Author24 — интернет-сервис помощи студентам

Дам массив А(н) с элементами (-20;20).получить массив В(к) состоящий из нечетных элементов массива А(н)

@softmob · 06.02.2011, 22:02

PureBasic

CLS
INPUT "vvedite n"; n
DIM a(n), b(n)
FOR i = 1 TO n
    a(i) = INT(RND * 41 - 20)
    IF (a(i) AND 1) = 1 THEN k = k + 1: b(k) = a(i)
NEXT
FOR i = 1 TO n
    PRINT a(i);
NEXT
PRINT
PRINT STRING$(80, 196)
FOR i = 1 TO k
    PRINT b(i);
NEXT

@Екатеринка19 0 / 0 / 0 Регистрация: 12.01.2011 Сообщений: 4
		1
	Одномерный массив 24.01.2011, 10:10. Показов 1146. Ответов 1 Метки нет (Все метки) Дам массив А(н) с элементами (-20;20).получить массив В(к) состоящий из нечетных элементов массива А(н) 0

	06.02.2011, 22:02

Одномерный массив

Решение