Tag × protected in Mathematica?

[nikolafmf]

Instead of giving the results of the calculation, Mathematica says:

"Tag Times in 0 × 1.52098*10^11 is Protected."

as in the attached file. Anyone has any idea how to get the results?

 

[DrClaude]

The line

If[Or[i == 100000, i == 200000, i = 300000],

should read

If[Or[i == 100000, i == 200000, i == 300000],

 

[nikolafmf]

It still says tag is protected, but also prints the results, which is what I want.

 

[Mark44]

The line

If[Or[i == 100000, i == 200000, i = 300000],

should read

If[Or[i == 100000, i == 200000, i == 300000],

Also, there's a right bracket missing in both expressions above.

 

[nikolafmf]

The right bracket is not missing, since the whole sentence is:

If[Or[i == 100000, i == 200000, i == 300000],
Print[NumberForm[x, 13], "\t", NumberForm[y, 13], "\t",
NumberForm[r, 13], "\t", u, "\t", v, "\t", NumberForm[w, 6], "\t",
i*h, "\t", NumberForm[average, 13]]]

 

[Bill Simpson]

Change

i = 300000

to

i == 300000

and

If[r < j, j = r]

to

If[r < j, j = r];

and your problems seem to go away