Выполнить в паскале
1. Массив из 10 целых чисел задан случайным образом в диапазоне от -65 до -45. Вывести на экран элементы, которые имеют четные номера.

65-45+1=21 Отметь как наилучшее решение .Мне нехватает 3 наи. реш до нового статуса

А зачем randomize?

для того чтобы программа сама выбрала произвольные числа

program gt;var a:array[1..10]of integer;i:integer;beginrandomize;for i:=1 to 10 dobegina[i]:=random(21)-65;if(i mod 2=0)then write(a[i],' ');end;end.