или кратко:
beginvar Rs := ReadArrInteger(3);Println('послед:', Rs.Sum);Println('парал:', 1/Rs.Sum(r->1/r));end.Пример работы:
или кратко:
beginvar Rs := ReadArrInteger(3);Println('послед:', Rs.Sum);Println('парал:', 1/Rs.Sum(r->1/r));end.Пример работы:
Поделитесь своими знаниями, ответьте на вопрос:
Какие записи алгоритмов вы знаете. Выберите несколько из 4 вариантов ответа:
Відповідь:
1, 2, 3
Пояснення: