Помогите пожалуйста! Надо написать программу вопрос поставлен так:
Написать программу для вычисления значения функции f (x , y ) по формуле. Осуществить вывод полученного значения функции на экран. Выполнить программу и протестировать все ветви алгоритма. Реализовать алгоритм решения задачи в виде блок-схемы.

f(x,y)=система 1-ое уравнение x^2*y^2/x; x>0 y<0 2-ое уравнение ln(x+y),в остальных случаях

Желательно на языке Pascal

Извините - скорблю по раненой душе Вашей, но помочь не смогу, ибо в сентенции означенной зело многое умишке моему недоступно:
1. "x^2*y^2/x; x>0 y<0" - и как сие разуметь? Ежели как x²*y²/x, то зачем просто не отписать x*y²? А уж ежели там у в степени 2/х, да еще при y<0, то тут, мил человек, кранты полныя, бо возводить число отрицательное да во степень рациональную и вовсе неможно!
2. "ln(x+y) в остальных случаях" - так-так... А к "остальным случаям" сим относится, прочего всего помимо, коллизия така: x<0, y>0, │x│>│y│, и в случае таком под логарифмом величина зело отрицательная оказывается, чего он (логарифм) не терпит напрочь! И что?

Короче говоря, уже без трёпа - соблаговолите сформулировать задание ясно, четко и однозначно, а не "вокруг да около". И сразу предупреждаю: отмазки типа "А мне так дали!" - не катят, нам до этого дела нет. Спрашивайте, уточняйте - это Ваши проблемы.

Идеально было бы при ответе воспользоваться скобками :))