0 / 0 / 0
Регистрация: 12.11.2016
Сообщений: 19

В матрице 3*4 найти произведение элементов кратных 3 и 9

04.02.2017, 09:43. Показов 1633. Ответов 4
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
в матрице 3*4 найти произведение элементов кратных 3 и 9
0
Лучшие ответы (1)
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
04.02.2017, 09:43
Ответы с готовыми решениями:

Найти произведение элементов массива, кратных 3 и 9
Найти произведение элементов массива, кратных 3 и 9. Размерность массива – 10. Заполнение массива осуществить случайными числами от 5 до...

Найти произведение элементов массива, кратных заданному
Каждую строчку: как она работает и для чего!!! Пожалуйста! (3). program a12; uses crt; const n=255; var

Найти сумму, произведение и количество элементов кратных 3
Найти сумму и произведение кол-во элементов кратных 3. Если можно в виде блок-схемы.

4
Почетный модератор
Эксперт по компьютерным сетямЭксперт Windows
 Аватар для magirus
28047 / 15783 / 983
Регистрация: 15.09.2009
Сообщений: 67,753
Записей в блоге: 78
04.02.2017, 09:47
ищи, чо. условий задания матрицы нет, как и нет условий задания элемент ов
0
 Аватар для Alexandr212
101 / 98 / 112
Регистрация: 28.11.2016
Сообщений: 528
04.02.2017, 13:36
Лучший ответ Сообщение было отмечено ZX Spectrum-128 как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
type
  mas = array [1..3, 1..4] of integer;
 
var
  a: mas;
  i, j, p: integer;
 
begin
  randomize;
  p := 1;
  for i := 1 to 3
    do 
    for j := 1 to 4
    do 
    begin
      A[i, j] := random(256);
      if (A[i, j] mod 3 = 0) or (A[i, j] mod 9 = 0)
        then p *= A[i, j];
    end;
  writeln(p);
end.
1
Эксперт Pascal/Delphi
6811 / 4568 / 4819
Регистрация: 05.06.2014
Сообщений: 22,438
06.02.2017, 16:04
Alexandr212, немножко подправил.

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
const
  n = 3;
  m = 4;
 
type
  mas = array [1..n, 1..m] of integer;
 
var
  a: mas;
  k, i, j: integer;
  p: real;
 
begin
  randomize;
  p := 1;
  k := 0;
  for i := 1 to n  do
  begin
    for j := 1 to m  do 
    begin
      A[i, j] := random(256);
      write(A[i, j]:5);
      if (A[i, j] mod 3 = 0) and (A[i, j] mod 9 = 0) then 
      begin
        p *= A[i, j];
        inc(k);
      end;
    end;      
    writeln;
  end;
  if k <> 0 then 
    writeln(p)
  else  
    writeln('Нет таких чисел.');
end.
1
 Аватар для Alexandr212
101 / 98 / 112
Регистрация: 28.11.2016
Сообщений: 528
06.02.2017, 16:10
Ой, и правда, забыл про индекс для нового массива, спасибо.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
06.02.2017, 16:10
Помогаю со студенческими работами здесь

в массиве из 15 элементов найти суммы четных и произведение кратных 3м
в массиве из 15 элементов найти суммы четных и произведение кратных 3м спасибо

В одномерном массиве найти произведение индексов элементов, кратных 3.
Составить блок-схему алгоритма решения задачи и программу. В массиве B найти произведение индексов элементов, кратных 3.

В матрице А[7,8] найти произведение элементов, значение которых меньше последнего элемента матрицы.
Помогите решить задачу! В матрице А найти произведение элементов, значение которых меньше последнего элемента матрицы. Если таких...

В квадратной матрице найти произведение элементов, лежащих выше побочной диагонали - ошибка в коде
В квадратной матрице найти произведение элементов, лежащих выше побочной диагонали. program Project2; {$APPTYPE CONSOLE} uses ...

Произведение элементов массива, кратных 5
Найти произведение элементов линейного массива целых чисел которые кратны 5.Размерность массива -10.Заполнение массива осуществить...


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

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

Новые блоги и статьи
Динамические массивы в C++ - создание и использование
NullReferenced 27.04.2025
Динамические массивы представляют собой один из фундаментальных инструментов программирования на C++, позволяющий создавать структуры данных, размер которых определяется во время выполнения. . .
Асинхронный JavaScript: Промисы, Async/Await и Fetch API
Reangularity 27.04.2025
Пользователь заходит на веб-страницу, нажимает кнопку и. . . ничего не происходит. Сайт словно замер. Через несколько секунд всё внезапно оживает, но пользователь уже успел закрыть вкладку. Знакомая. . .
Management on GitLab and repository management in Visual Studio code
jigi33 27.04.2025
- repo management on GitLab - CI/ CD in GitLab - VCS repository management in Visual Studio code (see attachments)
Kanban или Scrum - что выбрать?
EggHead 27.04.2025
Kanban и Scrum — уже много лет удерживают лидирующие позиции среди гибких подходов. Руководители проектов и команды разработчиков то и дело сталкиваются с дилеммой: какой из этих двух методов выбрать. . .
Кастомные Middleware на C# в ASP.NET Core
UnmanagedCoder 27.04.2025
Разработка веб-приложений сегодня мало напоминает монолитное программирование прошлых лет. На смену громоздким блокам кода пришла модульная архитектура, где каждый компонент выполняет строго. . .
Анализ и линтинг кода JavaScript: ESLint, Prettier и JSHint
run.dev 26.04.2025
JavaScript прошёл долгий путь от простого языка для анимации веб-страниц до основы современной веб-разработки. С ростом сложности приложений, увеличением кодовых баз и масштабированием команд. . .
Паттерны в Python: Singleton, Factory и Observer
py-thonny 26.04.2025
Паттерны проектирования — это проверенные временем решения типовых проблем разработки программного обеспечения. Их история берёт начало с книги "Приёмы объектно-ориентированного проектирования. . . .
Исключения в C#: Stack Overflow, Access Violation и Out of memory
stackOverflow 26.04.2025
Исключения в C# — это не только механизм оповещения о проблемах, а целое искусство управления потоком выполнения программы в экстремальных ситуациях. Обычное исключение, например,. . .
Логирование в C# ASP.NET Core с помощью Serilog, ElasticSearch, Kibana
stackOverflow 25.04.2025
Помните те времена, когда для анализа проблемы приходилось подключаться к серверу, искать нужный лог-файл среди десятков других и вручную фильтровать тысячи строк в поисках ошибки? К счастью, эти дни. . .
Структура "железный OnKeyUp" вместо антидребезга. Полностью асинхронный счётчик.
Hrethgir 25.04.2025
Программа для симуляции схемы - Logisim Evolution В общем какое-то время отвлёкся, так было надо, теперь когда запилю это на verilog и FPGA , досоставлю заявку в ФИПС на полезную модель - не готов. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru