Написать программу, которая выводит минимальный элемент введенного с клавиатуры массива целых чисел. Ниже приведен рекомендуемый вид экрана во время работы программы (данные, введенные пользователем, выделены полужирным шрифтом). Поиск минимального элемента массива .
Введите в одной строке элементы массива(5 целых чисел) и нажмите <Enter>.
_>23 0 45-5 12
Минимальный элемент массива:-5​

var

 n, i, min, k: integer;

begin

 WriteLn('Поиск минимального элемента массива.');

 Write('Введите количество чисел N = ');

 ReadLn(n);

 WriteLn('Введите в одной строке элементы массива (', n, ' целых чисел) и нажмите <Enter>.');

 for i := 1 to n do

 begin  

   Read(k);

   if i = 1 then if k < min then k := min else min := k else if k < min then min := k;

 end;  

 WriteLn('Минимальный элемент массива: ', min);

end.

Объяснение:

Наибольшее возможное значение выражения (f+o+x+e)*(f*r*d*d) = 236196. прилагаю небольшой скрипт на python. простенькая на корректную организацию перебора с использованием вложенных циклов: max_num = 0 for f in xrange(10):         for o in xrange(10):         for x in xrange(10):             for e in xrange(10):                   for r in xrange(10):                       for d in xrange(10):                             b = f*r*d*d                             if b == 0:                                   continue                             num = (f + o + x + e) * b                             if num > max_num:                                   max_num = num print "maximum value of (f+o+x+e)*(f*r*d*d) is: %i" % max_num решение можно получить гораздо проще, если догадаться, что наибольшее значение выражения достигается, когда сумма f+o+x+e и произведение f*r*d*d являются максимальными. это одновременно происходит, когда все цифры равны 9: (9+9+9+9)*9*9*9*9 = 236196