Ребята, нужна помощь! Решить задачу и составить блок-схему! Опции

[OlyaRudyak]

Привет Всем!!!!! )
Нужна помощь......... отчислят, если не сдам программу по паскаль!!!!!!

ЗАДАНИЕ: Разработать алгоритм решения задачи, составить блок-схему и запрограммировать решение на языке Pascal, используя подпрограмму-функцию.

Посчитать значение функции
f(x)={(-x-1 при x<-1,
0 при-1≤x<0,
x^2 при 0≤x<1,
1/x в других случаях)

В интервале x∈[-3;3] с шагом 0,25.

Заранее спасибо! ^_^