profile
Опубликовано 6 лет назад по предмету Информатика от timanna

Составить программу, которая будет вводить N чисел и искать максимальное число среди этих чисел.
1<=a[i], N<=100

  1. Ответ
    Ответ дан Анилай
    const
    n=100;
    var
    a:array[1..n] of integer;
    max,i:integer;
    begin
    randomize;
    for i:=1 to n do
    begin
    writeln(a[i]='');
    readln(a[i]);
    end;
    max:=a[1];
    for i:=2 to n do
    If a[i]>max then begin
    max:=a[i];
    end;
    writeln;
    writeln('Max=',max);
    readln;
    End.
    1. Ответ
      Ответ дан Аккаунт удален
      Хотя, она скорее не ошибка, а описка.
    2. Ответ
      Ответ дан Анилай
      Что же здесь я неправильно сделала?
    3. Ответ
      Ответ дан Аккаунт удален
      Я же Вам направил решение на исправление, там в комментарии написано
    4. Ответ
      Ответ дан Аккаунт удален
      max:=a[i]; перед for i:=2 to n do. Должно быть max:=a[1]
    5. Ответ
      Ответ дан Анилай
      Спасибо Вам, сама не заметила, как перепутала
Самые новые вопросы