Лучший ответ

    1.  0 0

    Allucard 6 (12341)21438 14 лет  

    хаха первый курс TSI ?????

Ответы

    1.  0 0

    bhs23 (30) 6 (9705)2723 14 лет  

    Не знаю дэлфи, но могу с примерно объяснить как делать, когда-то писал на паскале...

    1.  0 0

    Chrome_Shelled (2023) 7 (32789)643160 14 лет  

    мин = 0 макс=0
    фор и:=0 ту 100
    бигин
    иф ((массив[и] > массив(и+1)) энд (массив(и)>макс)) зен макс = массив(и)
    иф ((массив(и) < массив(и+1)) энд (массив(и) меньше мин)) зен мин = массив(и)
    энд

    ну что-т в этом духе будет. мне лень проверять, что и как будет работать, но принцип думаю передал, а дальше вроде должен разобраться

    1.  0 0

    pilum_1 5 (2800)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 в массиве - все пойдет наперекосяк. И условия у тя какие-то ненужно сложные, я даж не разбирал. :>





Похожие вопросы

Рейтинг@Mail.ru Top.LV PULS.LV Professional rating system