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

Форум пользователей пакета Mathematica

Модератор: Admin

ilyaZlatkin
Сообщения: 7
Зарегистрирован: Пн сен 14, 2009 6:46 pm
Контактная информация:

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

Сообщение ilyaZlatkin » Ср июл 11, 2012 3:34 pm

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

Markiyan Hirnyk
Сообщения: 1354
Зарегистрирован: Вс дек 04, 2011 11:07 pm

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

Сообщение Markiyan Hirnyk » Ср июл 11, 2012 7:29 pm

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\)]\)

ilyaZlatkin
Сообщения: 7
Зарегистрирован: Пн сен 14, 2009 6:46 pm
Контактная информация:

Сообщение ilyaZlatkin » Чт июл 12, 2012 3:29 pm

так и знал что очень просто
можно еще
Array[Subscript[c, ##] &, n ].Array[Subscript[c, ##] &, n]

Markiyan Hirnyk
Сообщения: 1354
Зарегистрирован: Вс дек 04, 2011 11:07 pm

Вы не правы

Сообщение Markiyan Hirnyk » Чт июл 12, 2012 5:43 pm

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 и пособия по правописанию.

ЮрийКН
Сообщения: 2
Зарегистрирован: Сб сен 22, 2012 11:04 pm
Контактная информация:

Сообщение ЮрийКН » Сб сен 22, 2012 11:08 pm

ilyaZlatkin писал(а):так и знал что очень просто
можно еще
Array[Subscript[c, ##] &, n ].Array[Subscript[c, ##] &, n]


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