Задача на одномерные массивы. QBasic - Помощь студентам

=do-mi-no= · 18.12.2010, 14:29

Всем доброго времени суток!!=)

Помогите пожалуйста с составлением программы в такой задаче:

1. Даны два одномерных массива Xn и Yn. Сформировать новый массив Zk, состоящий из положительных элементов Zi=Xj-Yj. Отсортировать исходный массив Yn по возрастанию.
____________

За Xn (1,-1,5,7,9,8,0,-5,3,2)
За Yn (1,3,4,5,7,-3,-6,-5,6,8)
____________

Зарание БОЛЬШОЕ СПАСИБО!!!

rubius2008 · 18.12.2010, 14:46

Сформировать новый массив Zk, состоящий из положительных элементов Zi=Xj-Yj

Код:

FOR I = 1 TO n 
	IF X(i)-Y(i)>0 THEN
               k=k+1
               Z(k)=X(i)-Y(i)
	END IF

=do-mi-no= · 18.12.2010, 16:31

Спасибо!Всё получилось))

18.12.2010, 14:29	#1
=do-mi-no= Регистрация: 18.12.2010 Сообщений: 5	Задача на одномерные массивы. QBasic Всем доброго времени суток!!=) Помогите пожалуйста с составлением программы в такой задаче: 1. Даны два одномерных массива Xn и Yn. Сформировать новый массив Zk, состоящий из положительных элементов Zi=Xj-Yj. Отсортировать исходный массив Yn по возрастанию. ____________ За Xn (1,-1,5,7,9,8,0,-5,3,2) За Yn (1,3,4,5,7,-3,-6,-5,6,8) ____________ Зарание БОЛЬШОЕ СПАСИБО!!!

18.12.2010, 14:46	#2
rubius2008 Форумчанин Регистрация: 19.03.2010 Сообщений: 409	Сформировать новый массив Zk, состоящий из положительных элементов Zi=Xj-Yj Код: `FOR I = 1 TO n IF X(i)-Y(i)>0 THEN k=k+1 Z(k)=X(i)-Y(i) END IF` Есть вопросы, пишите в ЛС.

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Задача Двумерные и одномерные массивы	BlackEzh	Помощь студентам	5	12.12.2010 16:37
Одномерные массивы задача	Тату	Помощь студентам	3	10.12.2010 11:08
Одномерные и Двумерные массивы(qBasic)	EgorA_T	Помощь студентам	0	17.06.2010 20:32
задача на одномерные массивы	salmanov	Паскаль, Turbo Pascal, PascalABC.NET	6	19.11.2008 15:59
задача на одномерные массивы	pelsh	Помощь студентам	3	05.01.2008 21:30

18.12.2010, 16:31	#3
=do-mi-no= Регистрация: 18.12.2010 Сообщений: 5	Спасибо!Всё получилось))