V=S/t - общепринятая формула. Соответственно в ячейке С1 будет формула =A1/B1
S(пока S больше или равно нулю начинай)
701-70
631-70
561-70
491-70
421-70
351-70
281-70
211-70
141-70
71-70
1-70
-69
N при этом
7+1
8+1
9+1
10+1
11+1
12+1
13+1
14+1
15+1
16+1
17+1
18
N=18
наверное как-то так
Для начала инициализация массива, ищем элементы типа "UINT" складываем и умножаем на два, затем делим всё на 2 если числа дробные, то выкидывем, дальше вывод массива.
скачать просто в ине и всё
<em>// PascalABC.NET 3.3, сборка 1600 от 23.12.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
var s:=ArrGen(17,i->real(i+1)); s.Println;
(s[10:]+s[9::-1]).Println
end.
<u>Пример</u>
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17
11 12 13 14 15 16 17 10 9 8 7 6 5 4 3 2 1