KTH, Matematik, Alexandre Chapovalov
5B1132, Amelia 1 för Farkostteknik
Inlämningsuppgift nr 1, redovisas fredagen den 6 feb 2004 kl. 14.15-15.00
Textat namn echo $Name; ?>
Personnummer echo "$T6-$T4"; ?>
$d2=$T6 % 10; $d1=($T6 % 100 - $c6 ) / 10; $m2=($T6 % 1000 - $T6 %100 ) / 100; $m1=($T6 % 10000 - $T6 %1000 ) / 1000; $y2=($T6 % 100000 - $T6 %10000 ) / 10000; $y1=($T6 - $T6 %100000 ) / 100000; $n4=$T4 % 10; $n3=($T4 % 100 - $n4) /10; $n2=($T4 % 1000 - $T4 %100 ) / 100; $n1=($T4 - $T4 %1000 ) / 1000; $a = 2+($n4+$d2+$m2+$m1)%4; $b = -1-$n2; $c = 2 + ($y2+$n4)%4; $d = 2+($n3+$d2+$m2+$y1)%4; $e = 1+$n3; $f = 2+($n2+$d1+$m2+$y1)%4; $x = $a+$d-$f; $y = 3*$a+$d-2*$f; $z = 9*$a+$d-4*$f; $av = $a+$b+$c; $bv = $d+$e; $cv = $f; $dv = $a+2*$b+4*$c; $ev = 2*$d+4*$e; $fv = 4*$f; $gv = $a+3*$b+9*$c; $hv = 3*$d+9*$e; $iv = 9*$f; $jv = $a*$x+$b*$y+$c*$z; $kv = $d*$y+$e*$z; $lv = $f*$z; $mv = $av+$bv; $nv = -$av+$bv;; $pv = $cv-$dv; $qv = $cv+$dv; $p = 1+($n3+$d2+$m2+$y1)%5; $q = 1+($n2+$d1+$m2+$y1)%5; if ($y2%2 == 1) $p = -$p; if ($n1%2 == 1) $q = -$q; $k = 1+$n4%5; $l = 1+$d2%3; $pk = $p*$k; $pql = ($q-$p)*$l; $ag = $p+2*$pk-3*$pql; $bg = $pk; $cg = $pql; $dg = -2*$ag; $eg = -2*$pk; $fg = -2*$pql; $gg = 3*($ag-$q); $hg = 3*$pk; $ig = 3*$pql+$q; ?>Parametrar. A= echo $av ?>, B= echo $bv ?>, C= echo $cv ?>, D= echo $dv ?>, E= echo $ev ?>, F= echo $fv ?>, G= echo $gv ?>, H= echo $hv ?>, I= echo $iv ?>, J= echo $jv ?>, K= echo $kv ?>, L= echo $lv ?>, M= echo $mv ?>, N= echo $nv ?>, P= echo $pv ?>, Q= echo $qv ?>, a= echo $ag ?>, b= echo $bg ?>, c= echo $cg ?>, d= echo $dg ?>, e= echo $eg ?>, f= echo $fg ?>, g= echo $gg ?>, h= echo $hg ?>, i= echo $ig ?>, p= echo $p ?>, q= echo $q ?>, k= echo $k ?>, l= echo $l ?>, pk= echo $pk ?>, pql= echo $pql ?>