Найти максимальный элемент среди отрицательных элементов массива

@Зануда · Регистрация: 25.12.2012

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

2. Решить задачу: в вещественном массиве найти максимальный элемент среди его отрицательных элементов

@ZLO1988 · 08.01.2013, 17:55

Забирай, вроде бы так сделал:

Pascal

Program gaBaugocBugaHu9i;
uses crt;
var
mass: array [1..15] of Real;
i: Byte;
min: real;
begin
writeln('Ïîëó÷åííûé ìàññèâ:');
for i:=1 to 15 do
begin
mass[i]:=-50+random(150);
write(mass[i]);
write(' ');
end;
writeln();
min:=0;
for i:=1 to 15 do
if (mass[i] < 0) and (mass[i] < min) then
begin
min:=mass[i];
end;
write('Ìàêñèìàëüíîå ÷èñëî èç îòðèöàòåëüíûõ: ');
writeln(min);
end.

@Vova Toretto · 28.03.2013, 19:33

хм а как эту задачу переделать в задачу с бинарным поиском?

@Зануда 0 / 0 / 0 Регистрация: 25.12.2012 Сообщений: 54
		1
	Найти максимальный элемент среди отрицательных элементов массива 08.01.2013, 14:13. Показов 8539. Ответов 2 Метки нет (Все метки) 2. Решить задачу: в вещественном массиве найти максимальный элемент среди его отрицательных элементов 0

@Vova Toretto 0 / 0 / 0 Регистрация: 28.11.2012 Сообщений: 16
	28.03.2013, 19:33	3
	хм а как эту задачу переделать в задачу с бинарным поиском? 0

Опции темы

Найти максимальный элемент среди отрицательных элементов массива

Решение