Вычислить значение функции с выбором формулы по условию, произведя предварительные расчеты входящих в нее величин для заданных значений. Язык — pascal

Вычислить значение функции с выбором формулы по условию, произведя предварительные расчеты входящих в нее величин для заданных значений. Язык — pascal