Составьте программу, которая заполняет массив a[1…

Задание:

Составьте программу, которая заполняет массив a[1… 10] случайными целыми числами в диапазоне от 0 до 10 и находит сумму минимального и максимальногоэлементов массива. П О М О Г И Т Е… П Л И З

Решение:

Var max,i,min: longint; m: array[1… 10] of longint; Beginmin: =100000; for i: =1 to 10 dobeginm[i]: =random (10); if m[i]max thenmax: =m[i]; end; writeln (min+max); End.

Знаете другой ответ?

Отправить свой ответ