Помогите решить - Помощь студентам

Andrey7284 · 18.12.2013, 11:50

Вычислить разность между максимальным и минимальным значением и заменить ею четные элементв массива.

ZX Spectrum-128 · 18.12.2013, 12:28

Как найти макс и мин тут:
http://www.programmersforum.ru/showthread.php?t=70310

Код:

Razn:=max-min;
For i:=1 to n do
 If not odd(i) then
  A[i]:=razn;

18.12.2013, 11:50	#1
Andrey7284 Регистрация: 18.12.2013 Сообщений: 7	Помогите решить Вычислить разность между максимальным и минимальным значением и заменить ею четные элементв массива.

18.12.2013, 12:28	#2
ZX Spectrum-128 Участник клуба Регистрация: 05.11.2013 Сообщений: 1,601	Как найти макс и мин тут: http://www.programmersforum.ru/showthread.php?t=70310 Код: `Razn:=max-min; For i:=1 to n do If not odd(i) then A[i]:=razn;`

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Парни помогите!!срочно нужно решить в течении пару часов..завтра зачет!Парни помогите!	razorl1ner	Паскаль, Turbo Pascal, PascalABC.NET	0	01.06.2009 00:02
Помогите решить	Ruster	Паскаль, Turbo Pascal, PascalABC.NET	0	11.01.2009 15:42
Помогите Помогите Пожалуйста Решить Одну Задачку в Паскале!!!	VisTBacK	Помощь студентам	6	19.09.2008 13:44