Лучший ответ
Ответы
-
0 0
bhs23 (31) 6 (9705)2723 14 лет
Не знаю дэлфи, но могу с примерно объяснить как делать, когда-то писал на паскале...
-
0 0
Chrome_Shelled (2024) 7 (32789)646163 14 лет
мин = 0 макс=0
фор и:=0 ту 100
бигин
иф ((массив[и] > массив(и+1)) энд (массив(и)>макс)) зен макс = массив(и)
иф ((массив(и) < массив(и+1)) энд (массив(и) меньше мин)) зен мин = массив(и)
энд
ну что-т в этом духе будет. мне лень проверять, что и как будет работать, но принцип думаю передал, а дальше вроде должен разобраться -
0 0
pilum_1 5 (2798)515 14 лет
найти максимальное и менимальное - перебором через цикл.
Чо-то вроде
max:=a[1]; min:=a[1];
for i:=1 to 100 do begin
if a > max then max:=a;
if a < min then min:=a;
end;
Chrome_Shelled, у тя неправильно - во первых, элементов массива 101, даж если он объявлен специально от 0 до 100, вот вторых - если будут числа меньше 0 в массиве - все пойдет наперекосяк. И условия у тя какие-то ненужно сложные, я даж не разбирал. :>