3

In[11]:=

S = 0 ;

Do[S += i^2, {i, 0, 10, 1}]

Print[S] ; S = 0 ; i = 0 ;

While[i≤10, S += i^2 ; i ++]

Print[S] ;

Sum[i^2, {i, 0, 10, 1}]

385

385

Out[16]=

385

Created by Mathematica  (April 10, 2007) Valid XHTML 1.1!