4. Вывести на экран только те элементы массива, которые меньше 5, элементы
массива заданы случайным образом.
var
а:array [1..10] of integer;
i:integer;
begin
for……begin
a[i]:=…(10);
write (a[........]:3);
end;
writeln;
writeln ('новый массив');
end.

Помогите,пожалуйста!