x:=10^3*a+10^2*b+10*c+d;x^2;expand(x^2)
Schriftlich Wurzelziehen x^2=w
Prof. Dr. Dörte Haftendorn, MuPAD 4, https://mathe.web.leuphana.de Aug.06
Automatische Übersetzung aus MuPAD 3.11, April 06 Update ...
Es fehlen noch textliche Änderungen, die MuPAD 4 direkt berücksichtigen, das ist in Arbeit.
Web: https://mathe.web.leuphana.de www.mathematik-verstehen.de
+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
x:=10^3*a+10^2*b+10*c+d;x^2;expand(x^2)
v:=1000000*a^2+2*100000*a*b+10000*b^2
+2* 1000*(10*a+b)*c+100*c^2
+2* 10*(100*a+10*b+c)*d+ d^2
simplify(expand(x^2)-v)
#################################
Für 3-stellige Zahlen
y:=10^2*b+10*c+d;y^2;expand(y^2)
z:=10000*b^2+2*1000*b*c+ 100*c^2
+2* 10*(10*b+c)*d+d^2;expand(z)
simplify(expand(y^2-z))
Zahlenbeispiel-------------------------
345^2
w:=119025
r1:=w-10000*b^2
r1s:=subs(r1, b = 3)
r2:=r1s-(2*1000*b*c+ 100*c^2)
r2s:=subs(subs(r2, b = 3),c=4)
r2:=r2s-subs(2* 10*(10*b+c)*d+d^2,b=3,c=4,d=5)
--------------------------------------------------------------------------
sqrt(2)
float(%)
%^2
