• Задача 7. Найти первый и последний элементы массива, кратные
    числу 3.
    Пример: массив 7 2 6 5 4 4 10 3 9
    элементы, кратные 3 6 39
    первый и последний из них 6 9

Ответы 1

  • var  a: array of byte := (7, 2, 6, 5, 4, 4, 10, 3, 9);  min, max: byte;begin  write('Кратные трём: ');  foreach i: byte in a do    if (i mod 3 = 0) then    begin      write(i, ' ');      if (min = 0) then        min := i      else        max := i;    end;    if (max = 0) then      max := min;    writeln();    writeln(min, ' ', max);end.
    • Автор:

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

Войти через Google

или

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

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

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