Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
 
0 / 0 / 0
Регистрация: 17.12.2019
Сообщений: 25
1

Написать процедуру вычисления произведения всех положительных элементов массива

27.10.2020, 15:38. Просмотров 196. Ответов 1
Метки нет (Все метки)


Написать процедуру вычисления произведения всех положительных элементов массива из 10 целых чисел. Применить данную процедуру к трем заданным массивам.
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
27.10.2020, 15:38
Ответы с готовыми решениями:

Написать процедуру для вычисления произведения минимальных элементов строки матрицы.
Составить процедуру для вычисления произведения минимальных элементов каждой строки матрицы A(m n)...

Написать процедуру вычисления среднего арифметического элементов значения положительных элементов массива
1) Для заданных условия составить процедуру и придумать несколько наборов тестовых данных для...

Написать процедуру вычисления суммы всех элементов для заданного двумерного массива A
Написать процедуру вычисления суммы всех элементов для заданного двумерного массива A состоящего из...

Написать процедуру для вычисления суммы положительных элементов
написать процедуру для вычисления суммы положительных элементов, заданного массива А,состоящего из...

1
Модератор
62827 / 46887 / 32314
Регистрация: 18.05.2008
Сообщений: 113,611
27.10.2020, 15:56 2
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
const n=10;
type mas=array[1..n]of real;
procedure prz(a:mas;var p:real);
var i,k:integer;
begin
k:=0;
p:=1;
for i:=1 to n do
if a[i[>0 then
 begin
  k:=1;
  p:=p*a[i];
 end;i
f k=0 then p:=0;
writeln('Произведение положительных=',p:0:2);
end;
Создайте 3 массива, выведите каждый и после каждго вывда вызовите эту процедуру.
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
27.10.2020, 15:56

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

Составить программу для вычисления произведения Z положительных элементов массива (x(10))
составить программу для вычисления произведения Z положительных элементов массива (x(10)). значение...

Написать процедуру получения произведения четных элементов одномерного массива
Написать процедуру получения произведения четных элементов одномерного массива .

Написать функцию вычисления произведения элементов массива
Написать функцию вычисления произведения элементов массива. В качестве входных параметров передать...

Составить процедуру обнуления всех положительных элементов массива
Составить процедуру обнуления всех положительных элементов в одномерном массиве A. С помощью этой...

Написать программу вычисления произведения чётных элементов одномерного массива
Здравствуйте! Обращаюсь к Вам за помощью. Нужно написать следующую программу: Буду благодарна за...

Составить программу для вычисления произведения всех элементов массива, имеющий индекс кратный 3.
Условие Задать случайным образом из промежутка одномерный массив A(N). Выполнить задание своего...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

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