var
d : array of integer := new integer[15];
n : integer;
begin
d := arrRandom(15, -44, 18);
for var i := 0 to 14 do if d[i] <= 13 then n += 1;
writeln(d);
writeln(n);
end.
var
d : array of integer := new integer[15];
n : integer;
begin
d := arrRandom(15, -44, 18);
for var i := 0 to 14 do if d[i] <= 13 then n += 1;
writeln(d);
writeln(n);
end.