Паскаль! •

написать блок-схему к программе: нахождение
среднеарифметического четырех нечетных, кратных трем чисел

программу уже написал: (фото)

ответ:надеюсь это то что надо

const

   N = 5;

var

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

   i, iMin: integer;

begin

   writeln('Исходный массив:');

   for i := 1 to N do

   begin

       a[i] := random(100) - 50;

       write(a[i]:4);

   end;

   iMin := 1;{инциируем первым элементом}

   for i := 2 to N do {проверяем все остальные}

       if a[i] < a[iMin] then {новый минимальный}

           iMin := i; {запомнить i}

   writeln; {перейти на новую строку}

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

end.

Объяснение за внимание))

Чтобы решить эту задачу, сначала разделим полученные числа на две части, при это надо учесть, что числа стоят в порядке неубывания:

1616 -> 16 и 16, 169 -> 1 и 69, 163 -> 1 и 63, 1916 -> 1 и 916, 1619 -> 16 и 19, 316 -> 3 и 16

Теперь необходимо убрать все числа, которые точно не смогут получиться.

Выясним, какое максимальное число может получиться, если сложить два разряда (неважно, старший и средний, или средний и младший).

9 + 9 = 18 - максимально возможное число.

Оставим все числа, в которых слагаемые меньше или равны 18:

1616 -> 16 и 16, 316 -> 3 и 16

Попробуем подобрать числа, из которых они были получены.

1616 -> 16 и 16 -> 888 (8 + 8 = 16, 8 + 8 = 16) - подходит

316 -> 3 и 16 -> такое число подобрать не получится, потому что между 3 и 16 большая разница и исходного числа не существует.

ответ: 1 число (1616)