Лучший ответ

    1.  2 0

    Doctor_ 7 (60214)1096280 11 лет  

    я бы делал из массива на три числа.. не помню синтаксис, но алгоритм что-то типа:

    var temp,i,j:integer;
          array[3] of integer;

    begin
    temp:=0;
    for i:=1 to 3 do
    begin
    readln(array);
    end;
    for i:=1 to 3 do
    begin
    for j:=1 to 3 do
    if array[j+1] > array[j] then   //не уверен что паскаль поймет
    begin
    temp := array[j+1];
    array[j+1] =: array[j];
    array[j] :=temp;
    end;
    end;
    end;
    for i:=1 to 3 do
    writeln(array[j]);
    end.

Ответы

    1.  0 0

    Arturik111111111 (38) 6 (7096)2412 11 лет  

    читать слайды если не помогло ещё читать слайды если опять не помогло купить книжку паскаль для чайников и читать читать пока не поможет либо в торой выриант накрасить глазки губки и попросить умненького однокурсника тебе объяснить

    1.  0 0

    Arix 6 (16373)31126 11 лет  

      a: array  [1..3] of integer;

    тут ошибочка
    if array[j+1] > array[j] then

    поймет

    1.  0 0

    ^Stinger^ (35) 6 (15587)31564 11 лет  

    Doctor зачем столько кода и массив с циклами ради 3х чисел? Достаточно сравнить 3 числа между собой оператором if. Это займет 3 строчки

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

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