• Пожалуйста!! Паскаль.
    Дан целочисленный массив из 60 элементов. Элементы массива могут принимать целые значения от 0 до 100. Опишите алгоритм, позволяющий найти и вывести номер первого элемента массива, который больше, чем 7. Если таких элементов нет, программа должна вывести сообщение об этом.

Ответы 1

  • Алгоритм:выставляем некий индикатор = 0идем по массивуесли находим элемент больше 7, выставляем индикатор = 1, прекращаем просмотр массива, выводим номер элемента.Если дошли до последнего элемента и все меньше 7 (индикатор = 0), выводим соответствующее сообщение.Прога:program test1;varM1: array [1..60] of integer;ind, i: integer;beginind :=0;i := 1;repeatif M1[i]>7  then beginwriteln(i);ind := 1;i :=  60;end;inc(i);if ((i>60) and (ind=0)) beginwriteln('массив не содержит элементов, больших 7');ind := 1;end;until(ind=1);end;
  • Добавить свой ответ

Войти через Google

или

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

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

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