Тебе из будет трудно искать на рабочем столе или в память компьютера, также они будут длинные и название будет показываться не полностью
Вторая схема, так как АЕ = 1; ЕС=2 и так далее. В первом графике эти данные не совпадают.
Решение задачи на языке PascalABC:
<em>Program n1;
</em>
<em>Var a:array[1..16] of integer; i:integer; //Описываем переменные
</em>
<em>Begin
</em>
<em>For i:=1 to 16 do Begin //цикл на перебор массива
</em>
<em> a[i]:=random(40)-20; //заполняем массив
</em>
<em> write(a[i],' '); //выводим значение каждого элемента массива
</em>
<em>End;
</em>
<em>writeln; //пропускаем строчку при выводе
</em>
<em>For i:=1 to 16 do Begin //цикл на перебор массива
</em>
<em> if a[i] mod 2 = 0 then //условие чётности
</em>
<em> writeln('Элемент со значением (',a[i],') под номером #',i,' является чётным'); //вывод чётных элементов и их номеров
</em>
<em>End;
</em>
<em>End.</em>