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

На­пи­ши­те про­грам­му, ко­то­рая в по­сле­до­ва­тель­но­сти на­ту­раль­ных чисел опре­де­ля­ет мак­си­маль­ное число, крат­ное 4. Про­грам­ма по­лу­ча­ет на вход ко­ли­че­ство чисел в по­сле­до­ва­тель­но­сти, а затем сами числа. В по­сле­до­ва­тель­но­сти все­гда име­ет­ся число, крат­ное 4. Ко­ли­че­ство чисел не пре­вы­ша­ет 1000. Введённые числа не пре­вы­ша­ют 30 000. Про­грам­ма долж­на вы­ве­сти одно число — мак­си­маль­ное число, крат­ное 4.

При­мер ра­бо­ты про­грам­мы:

Вход­ные дан­ные Вы­ход­ные дан­ные
3
8
16
11 16

  1. Ответ
    Ответ дан Аккаунт удален
    ОТДЕЛ Задание+;
    ИСПОЛЬЗУЕТ Вывод ИЗ "...ОтделыОбмен", Приём;

    ПЕР
      массив: ДОСТУП К РЯД ИЗ ЦЕЛ;
      сч, макс: ЦЕЛ;

    УКАЗ
      СОЗДАТЬ(массив, Приём.Число());
      ОТ сч := 0 ДО РАЗМЕР(массив^) - 1 ВЫП
        Вывод.Цепь("^");
        массив[сч] := Приём.Число()
      КОН;
      макс := 0;
      ОТ сч := 0 ДО РАЗМЕР(массив^) - 1 ВЫП
        ЕСЛИ массив[сч] ОСТАТОК 4 = 0 И массив[сч] > макс ТО
          макс := массив[сч]
        КОН
      КОН;
      Вывод.ЧЦел("^%d", макс, 0, 0, 0)

    КОН Задание.
Самые новые вопросы