Посчитать площадь материала, намотанного на цилиндр, без использования макроса

[misha_057]

Добрый день.
Как посчитать площадь материала, намотанного на цилиндр, без использования макроса?
С каждым новым слоем нужно учесть толщину намотанного материала, т.е.
S1 = L*Pi*d (L - длина цилиндра, d -диаметр, количество слоев может быть до 16)
S2 = L*Pi*(d+толщ) + S1
S3 = L*Pi*(d+2*толщ) + S1 + S2 и т.д.

Не хочется городить небоскреб из "ЕСЛИ", возможно есть более красивый способ?

[Дмитрий Щербаков(The_Prist)]

А файла с примером данных не будет? Откуда что брать? Потому что сейчас по виду достаточно просто ссылки на ячейки сделать...

P.S. Pi - это что?

[alex77755]

S2 = L*Pi*(d+толщ) + S1
А разве 1 толщину надо прибавлять?
Составь формулу для нескольких слоёв. Вынеси за скобки общий множитель  L*Pi и приведи подобные члены
Школьная же программа. И программировать не надо

[misha_057]

А файла с примером данных не будет?

Школьная же программа.

Формула для нескольких слоев у меня получилась такая (надеюсь, правильная)

Sn = L*3.14*(d+(n-1)*толщ)+S₁+S₂+...+Sn-₁

Файл с примером не сложный:
J15 - кол-во слоев n
К12 - длина L
L12 - диаметр d
F4 - толщина
Pi = 3.14

У меня пока получается так:

Код: (vb)

=ЕСЛИ(J15=1;K12*3,14*(L12+0*F4)/1000000;ЕСЛИ(J15=2;K12*3,14*(L12+0*F4)/1000000+K12*3,14*(L12+1*F4)/1000000;0))

С каждым новым слоем диаметр увеличивается на толщину предыдущего слоя.
Для каждого нового слоя нужно дописывать сумму предыдущих, к 16 слою боюсь не уместиться в 8000 знаков допустимой длины формулы. 

[alex77755]

С каждым новым слоем диаметр увеличивается на толщину предыдущего слоя.

Радиус увеличивается на толщину!
А диаметр на 2 толщины! Разве нет?!

к 16 слою боюсь не уместиться в 8000

Надо просто вынести за скобки количество слоёв.
И все поместится
Кроме сложения есть и умножение

[misha_057]

Радиус увеличивается на толщину! А диаметр на 2 толщины! Разве нет?!Надо просто вынести за скобки количество слоёв.

Спасибо за подсказку насчет диаметра.
За формулу буду очень признателен.