Cоставьте программу, которая заполняет массив а [1..10] случайными целыми числами в диапазоне от 1 до 20 и выводит на экран элементы, значения которых больше 5 и меньше 15

На Pascal:

program znanija;

uses Math;//если на Delphi, то System.Math

var a: array [0..10] of integer;

begin
for I := low(a) to high(a)do
begin
a[I] := randomrange(1, 20);
if (a[I] gt; 5) and (a[I] lt; 15) then
writeLN(a[I])
end;
end.

Не забудь скомпилировать и отписаться, я мог допустить опечатку