Задание:
Дан числовой массив А, состоящий из п натуральных чисел. Найти произведение минимального и максимального элементов. (помогитесрочно)
Решение:
const N=10; var a: array[1… N] of integer; i, min, max: integer; begin min: =30; for i: =1 to N do begin a[i]: =random (30); if (a[i] < min) then min: =a[i]; if (a[i] > max) then max: =a[i]; write (a[i], '); end; writeln ('Произведение: ', min*max); end.
Знаете другой ответ?