Страница 1 из 1

генерировать выражение

Добавлено: Ср июл 11, 2012 3:34 pm
ilyaZlatkin
Добрый день
Подскажите как с генерировать, следующее выражение
С1^2+C2^2+C3^2+...Cn^2
где n задается
Изображение

Re: генерировать выражение

Добавлено: Ср июл 11, 2012 7:29 pm
Markiyan Hirnyk
ilyaZlatkin писал(а):Добрый день
Подскажите как с генерировать, следующее выражение
С1^2+C2^2+C3^2+...Cn^2
где n задается
Изображение

In[1]:=Sum[Subscript[S, i]^2, {i, 1, n}]
Out[1]=\!\(
\*UnderoverscriptBox[\(\[Sum]\), \(i = 1\), \(n\)]
\*SubsuperscriptBox[\(S\), \(i\), \(2\)]\)

Добавлено: Чт июл 12, 2012 3:29 pm
ilyaZlatkin
так и знал что очень просто
можно еще
Array[Subscript[c, ##] &, n ].Array[Subscript[c, ##] &, n]

Вы не правы

Добавлено: Чт июл 12, 2012 5:43 pm
Markiyan Hirnyk
ilyaZlatkin писал(а):можно еще
Array[Subscript[c, ##] &, n ].Array[Subscript[c, ##] &, n]

Нельзя:
In[1]:=Array[Subscript[c, ##] &, n].Array[Subscript[c, ##] &, n]
Array::ilsmn: Single or list of non-negative machine-sized integers expected at position 2 of Array[Subscript[c, ##1]&,n]. >>
Out[1]=Array[Subscript[c, ##1] &, n].Array[Subscript[c, ##1] &, n]
Советую читать книги по Mathematica и пособия по правописанию.

Добавлено: Сб сен 22, 2012 11:08 pm
ЮрийКН
ilyaZlatkin писал(а):так и знал что очень просто
можно еще
Array[Subscript[c, ##] &, n ].Array[Subscript[c, ##] &, n]


не работает :?