Var s, p: longint; i, j, n: integer; begin write('введите n: '); readln(n); s : = 0; for i : = 1 to n do begin p : = 1; for j : = i to 2 * i do p : = p * j; s : = s + p end; writeln('сумма равна ', s) end. тестовое решение: введите n: 5 сумма равна 158306
Vip2002www86
25.03.2021
Деловая грфика-область компьютерной графики, предназначенная для наглядного представления различных показателей работы учреждений. плановые показатели, отчетная документация, статистические сводки - вот объекты, для которых с деловой графики иллюстративные материалы. программные средства деловой графики включаются в состав электронных таблиц. назначение деловой графики - создание иллюстраций, часто используемых в работе различных учреждений. плановые показатели, отчетная документация, статистические сводки - вот объекты, для которых с деловой графики иллюстративные материалы. общий вид условной функции следующий: если(< условие> ; < выражение1> ; < выражение2> ) условие — это логическое выражение, которое может принимать значение истина или ложь. < выражение 1> и < выражение 2> могут быть числами, формулами или текстами. условная функция, записанная в ячейку таблицы, выполняется так: если условие истинно, то значение данной ячейки определит < выражение 1> , в противном случае — < выражение 2> .
vtarasyuk
25.03.2021
Отвечал уже. неправильно поставлен вопрос. ткань уже купили еще до указа, и длина куска в метрах уже не изменится, несмотря ни на какие указы. изменилась длина самой сажени в метрах как меры длины. 1 сажень = 3 аршина, значит 5 саженей и 3 аршина = 6 саженей. до указа 6 саженей = 6*2,16 = 12,96 м после указа 6 саженей = 6*2,1336 = 12,8016 м 6 саженей стали короче на 0,1584 м. а кусок ткани в 6 старых саженей стал 12,96 / 2,1336 = 6,074 новых саженей.