Форум программистов, компьютерный форум, киберфорум
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
Другие темы раздела
Pascal Длина слов https://www.cyberforum.ru/ pascal/ thread2768106.html
Словом назовем всякую последовательность букв латинского алфавита длины не более 20, а предложением – всякую последовательность не более чем 30 слов, отделенных друг от друга сериями пробелов....
Выведите на экран числа от 1 до N «обратной елочкой», т.е. в последней строке одно число, в предпоследней – два, и т.д Pascal
К примеру вводится число N=12 вывод должен выглядеть так: 11 12 7 8 9 10 4 5 6 2 3 1 Используя цикл for
Неправильно написал функцию Pascal
Я не знаю как правильно оформлять функцию, может кто подсказать?) var y,a : Integer; function MyFactorial(x: Integer) : Integer ; var i,s : Integer; begin for i:=1 to x do s:=s*i; ...
Pascal Вычислить значение выражения в общем я запуталась.. помогите исправить const xn=-6; xk=1; h=1; y=2; var x, xn,xk,h,f,y:real; begin https://www.cyberforum.ru/ pascal/ thread2767971.html
Pascal Поменять местами строки массива https://www.cyberforum.ru/ pascal/ thread2767854.html
Дан двумерный массив из четного числа строк. Поменять местами его строки следующим образом: первую строку поменять со второй, третью с четвертой и так далее.
Pascal Определить номера точек, которые могут являться вершинами равнобедренного треугольника
В одномерном массиве с четным количеством элементов (2N) находятся координаты N точек плоскости. Они располагаются в следующем порядке: x1, y1, x2, y2, x3, y3 и т.д. Определить номера точек, которые...
Найти все натуральные четырехзначные числа, цифры в которых образуют строго возрастающую последовательность Pascal
Найти все натуральные четырехзначные числа, цифры в которых образуют строго возрастающую последовательность (1234), (2345),(3456) и тп использую подпрограмму
Pascal Вычислить произведение Здравствуйте помогите правильно записать... У меня в результате части программы получился вектор q в нем 20 чисел... теперь мне нужно посчитать и него: Вычислить... https://www.cyberforum.ru/ pascal/ thread2767697.html
Pascal Задача по произведению https://www.cyberforum.ru/ pascal/ thread2767672.html
Пожалуйста, помогите с задачей
Pascal Рекуррентная формула Можете помочь с данной задачей?(Название темы неправильное подобрал) https://www.cyberforum.ru/ pascal/ thread2767666.html
Pascal Алфавит и моя ошибка нумерации https://www.cyberforum.ru/ pascal/ thread2767642.html
Решил я вывести буквы от A до Z (это у меня получилось), потом подумал.... неплохо бы пронумеровать бук с 1-А до 26-Z, но тут моя ошибка.. var i : Char; s, n : Integer; begin for i:='A' to 'Z'...
Pascal Удалить из слов текста все предыдущие вхождения последней буквы каждого слова Здравствуйте! Помогите пожалуйста написать код к задаче Задача: Дана последовательность символов. Преобразовать ее следующим образом: удалить из слов этого текста все предыдущие вхождения... https://www.cyberforum.ru/ pascal/ thread2767386.html
4249 / 2035 / 2091
Регистрация: 10.12.2014
Сообщений: 7,823
12.01.2021, 14:05 0

Произведение

12.01.2021, 14:05. Просмотров 463. Ответов 2
Метки (Все метки)

Ответ


Если в PascalABC.NET, то очень просто:
Pascal
1
2
3
4
function f(w:Real):=;
begin
  ReadArrReal('вектор w:',ReadInteger('n = ')).Product(w->f(w)).Print;
end.
Вместо «…» нужно только вставить вашу функцию, о которой нет информации!

Вернуться к обсуждению:
Произведение
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
12.01.2021, 14:05

Заказываю контрольные, курсовые, дипломные и любые другие студенческие работы здесь или здесь.

Произведение цифр
Требуется найти наименьшее натуральное число Q такое, что произведение его цифр равно заданному...

Произведение цифр - 2
Найдите количество чисел из отрезка , которые делятся на произведение своих цифр. Входные данные...

Произведение с факториалами
Дано: (1+1/i!) Нужно найти произведение всех значений данной функции при условии, что i - это...

Вычислить произведение
нужно вычислить произведение, исключая точки разрыва. То есть написать программу...

Вычислить произведение
Вычислить произведение 1*3*5*...*(2*n-1), где n - заданное натуральное число.

произведение делителей
использую процедуру, найти натуральное число, произведение всех деталей которого = 5832. помогите,...

0
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.