4 Дан массив из 50 чисел. Заполните его случайными числами. Вывести на экран сначала все положительные его элементы, а затем все отрицательные.

Как это сделать и объясните пожалуйста

Начни с простого - заполни каркас прграммы

program Task4;
begin
end.

Далее читаешь условие
Это означает, что, по-хорошему, нужно объявить новый тип данных - массив из 50 чисел, а затем переменную этого типа

const
  N = 50;
type
  TArray = array [1..N] of integer;
var
  a: TArray;

Для дальнейшего продолжения необходимо понимать, что такое массив и как с ним работать - перебирать элементы. Можешь заглянуть в FAQ - ссылка к нему выделена красным цветом в верху этой страницы.
Если это доступно, то читаешь о функции random, которая поможет заполнить массив.

Я не уверен в твоём желании разбираться, поэтому продолжу, когда увижу твои попытки решить собственую домашнюю работу.

Ок