Составить таблицу значений функции y = 5 - x2/2 на отрезке [-5; 5] с шагом 0.5.
var
x, y: real;
begin
x := -5;
writeln(' x y ');
while x <= 5 do begin
y := 5 - x*x/2;
writeln(x:4:1,' | ',y:5:2);
x :=x + 0.5
end;
Объясните пожалуйста, writeln(x:4:1,' | ',y:5:2); что делает эта строка? Откуда эти делители? Для чего они нужны?

Это не знак деления, а двоеточие.  

В программировании знаком деления является косая черта дроби "/".

При выводе данных можно указать, сколько ячеек (знако-мест) на экране следует отвести для выводимого значения. Это бывает полезно, если, например, ты выводишь на экран таблицу. в которой все элементы должны иметь одну ширину.

writeln(x:4:1,' | ',y:5:2);

Здесь под дробное число x (икс) выделяется четыре знако-места. При этом значение икса округляется до одного знака после запятой. Этот один знак будет выводиться в любом случае — даже если икс целый.

Например, если x = 3, то на экран он выведется так: _ 3 . 0

_ — это как бы пробел.

Для значения y (игрек) выделяется пять знако-мест, а округление идет до двух знаков после запятой.

Например: _ 4 . 1 5