Derive version 6.10 DfW file saved on 02 Jan 2008  TABLA(x, y, a, d, s):=VECTOR([x, y], x, a, a + s00b7d, s) f(t):=[300b7t + t^3, 300b7t^2, 300b7t - t^3] g(t):=[500b7COS(t), 500b7SIN(t)] g1(t):=300b7t00b7COS(t) g2(t):=300b7t00b7SIN(t) g3(t):=400b7t h(t):=[400b7COS(t), 200b7SIN(t)] m(t):=[e7c0^(0.2500b7t)00b7SIN(200b7t), e7c0^(0.2500b7t)00b7COS(200b7t)] p(t):=[500b7COS(300b7t), 500b7SIN(300b7t), 300b7t^2] q(t):=[500b7COS(t)^3, 500b7SIN(t)^3] v(t):=[- 500b7SIN(t), 500b7COS(t)] hCross:=APPROX(-3.015873015) r:=SIN(03b8/2) vCross:=APPROX(3.225806451) Precision:=Approximate PrecisionDigits:=10 Notation:=Scientific NotationDigits:=10 Branch:=Principal Exponential:=Auto Logarithm:=Auto Trigonometry:=Auto Trigpower:=Auto Angle:=Radian CaseMode:=Insensitive VariableOrder:=[x,y,z] OutputBase:=Decimal InputBase:=Decimal InputMode:=Character DisplayFormat:=Normal TimesOperator:=Dot DisplaySteps:=false CTextObj{\rtf1\ansi\ansicpg1252\deff0\deflang3082{\fonttbl{\f0\fmodern\fprq1\fcharset0 Derive Unicode;}} \viewkind4\uc1\pard\f0\fs24 Pr\'e1ctica 3\'aa - Funciones vectoriales de variable real\par \par Diego Antonio Lucena Pumar\par \par 1.Vectores con DERIVE\par \par Ejercicio 1\par } CExpnObj8Nueva[2,-1,6]0Simp(#1)[2,-1,6]{\rtf1\ansi\ansicpg1252\deff0\deflang3082{\fonttbl{\f0\fmodern\fprq1\fcharset0 Derive Unicode;}} \viewkind4\uc1\pard\f0\fs24 Ejercicio 2\par } 8@Nueva.[2*x+1,SIN(x+x^3),LN(x^2+1),(x^2+3*x)/(x^3+1)]PPSimp(#3)Q?,[2*x+1,SIN(x^3+x),LN(x^2+1),x*(x+3)/(x^3+1)]{\rtf1\ansi\ansicpg1252\deff0\deflang3082{\fonttbl{\f0\fmodern\fprq1\fcharset0 Derive Unicode;}} \viewkind4\uc1\pard\f0\fs24 Ejercicio 3\par } 8`Nueva[x^3+1,SIN(x+SIN(x)),LN(x^2+1)]8NuevaPrecision:=Approximate8 NuevaNotation:=Scientific80PSust(#5)#[34^3+1,SIN(34+SIN(34)),LN(34^2+1)]h` Aprox(#8) '[3.9305*10^4,0.02843267111,7.053585727]{\rtf1\ansi\ansicpg1252\deff0\deflang3082{\fonttbl{\f0\fmodern\fprq1\fcharset0 Derive Unicode;}} \viewkind4\uc1\pard\f0\fs24 Ejercicio 4\par } 8Nueva VECTOR(x^2,x,10)p Simp(#10) [1,4,9,16,25,36,49,64,81,100]8 Nueva VECTOR(x^3,x,10,15)x0@ Simp(#12) [1000,1331,1728,2197,2744,3375]8P`NuevaVECTOR(x!,x,0,10,2)pp Simp(#14)#[1,2,24,720,4.032*10^4,3.6288*10^6]{\rtf1\ansi\ansicpg1252\deff0\deflang3082{\fonttbl{\f0\fmodern\fprq1\fcharset0 Derive Unicode;}} \viewkind4\uc1\pard\f0\fs24 Ejercicio 5\par } 8Nuevav:=[3,6,23,-34]8Nueva ELEMENT(v,2) Simp(#17)68 P0NuevaABS(v)@8P Simp(#19) 41.593268688`hpNueva[3,4]CPlotObjF C2DPlotViewCPointListPlot @ @xy??}}@{@11??BM-6(_,