Вопрос Ребят помогите программку написать пожалуйста на Pascal

[Vlad]

(Задание: Написать программу, которая по введенному значению аргумента вычисляет значение функции, заданной в виде графика. Параметр R вводится с клавиатуры.)
//otvet.imgsmail.ru/download/64875526_25282b7083cb765a78ec3e9d55a9db40_800.jpg

 

[имя]

Если напишешь функции, то могу, а так лень их додумывать)

 

[влад 55]

условный оператор+капелька геометрии, ничего сложного где код, с которым требуется помощь?