№1 Массив А из 8 элементов заполнить целыми случайными из [-15;15]. Найти min элемент массива. Выдать порядковые номера всех элементов, равных минимальному. №2 Массив А заполнить: 1 3 5 7 9 ... 99 Найти среднее арифметическое ...
№1
Массив А из 8 элементов заполнить целыми случайными из [-15;15]. Найти min элемент массива. Выдать порядковые номера всех элементов, равных минимальному.
№2
Массив А заполнить: 1 3 5 7 9 ... 99
Найти среднее арифметическое элементов, расположенных с 5 по 8.
№3
Дан массив А из 12 элементов. Вычислить кол-во элементов, значение которых равно В
Ответ(ы) на вопрос:
1)
uses crt;
var a=array[1..8] of integer;
b=array[1..8] of integer;
i,min,j:integer;
begin
randomize;
min:=16;
for i:=0 to 8 do
begin
a[i]=random(30)-15;
if (a[i]
Не нашли ответ?
Похожие вопросы