VBA. 1) Создайте пользовательскую функцию: Function Translat_MesToNum(anMes As String) As Integer которая по имени месяца возвращает его номер. Используйте структуру Select Case.
2) Создайте функцию с необязательным параметром. В том случае, если этот параметр не получит никакого значения, функция должна возвращать одно значение (например, имя Катерина), а если параметр задан - то другое значение (другое имя).

👇

Открыть все ответы

Ответ:

Lopidon11

22.05.2020

Можно воспользоваться вариантом Vladmor, он более легкий и подходит под эту задачу, но чтобы не повторяться, для разнообразности, предложу свой вариант.

1+3+5+7 это ничто иное как арифметическая прогрессия.
Есть несколько формул суммы членов прогрессии, но под этот тип задачи подойдёт такая: $S_{n} =\frac{2a_{1}+d(n-1)}{2} * n$

$a_{1}$ - это член последовательности с индексом 1, то есть первое число в ряду.
d - это разность между двумя соседними членами, из большего вычитаем меньшее

n - это сколько всего членов

и так, у нас получается
$a_{1}$ = 1 (в условии задачи сказано что первый подарок весит 1кг)
d = 2 (в условии сказано что следующий подарок увеличивается на 2, ничто иное как разность)
n = это переменная, она нам не известна, поэтому так и оставим.
$S_{n}$ - это сумма веса всех подарков, в примере используется слово "weight" что в переводе "вес", поэтому подставим это слово.

И теперь подставим что у нас имеется.
weight = $\frac{2*1+2(n-1)}{2} * n$
weight = $\frac{2+2(n-1)}{2} * n$

В коде программу будет записано так
weight = ( ( 2+2*(n-1) ) / 2)*n

Проверим, например у нас 5 детей, значит надо 5 подарков, это
1+3+5+7+9 = 25
Проверим формулу
weight = ( ( 2+2*(5-1) ) / 2)*5
weight = ( ( 2+2*4 ) / 2)*5
weight = ( ( 2+8 ) / 2)*5
weight = ( 10 / 2)*5
weight = 5*5
weight = 25
Всё сходится.

Расписал подробно, чтобы всё было понятно
Так же этот вариант подойдёт для других таких типовых задач, а вариант Vladmor подойдёт только в некоторых случаях, будь внимателен(на)

4,8(33 оценок)

Ответ: