• найти максимальный элемент в массиве А10,заполненном случайным образом.

Ответы 1

  • var

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

      i, max : integer;

    begin

      for i := 1 to 10 do a[i] := trunc (random (500));

      max := 1;

      for i := 2 to 10 do

        if a[i] > a[max] then max := i;

      writeln ('Максимальный элемент a[', max, '] = ', a[max]);

    end.

    • Автор:

      derick
    • 6 лет назад
    • 0
  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years