Я правд не очень в этом,чет на подобии

cls
input x,y
Read ....
Data ....
IF x>=0 then z=x+y
else IF x<0 .....
Print Z,F
End

Потом над составить алгоритм-схему....

CLS
INPUT x, y
'вычисляем Z
IF x>0 THEN
______z=x+y
ELSE
____IF x<0 THEN
__________z=1/(x^2+1)
END IF
'вычисляем F
IF x>y THEN max=x ELSE max=y
IF z>max THEN max=z
f=max
'выводим на экран
PRINT z, f
END

Так как в твоей задаче не рассматривается вариант нахождения z при х=0, то в таком случае автоматически присваивается z=0.

P.S. Я полагаю, в Турбо Бейсике лишь слегка отличается запись операторов. Например, сложное условие пишется в строчку, а не в столбик...