0 / 0 / 0
Регистрация: 17.06.2019
Сообщений: 15
1

Сформировать последовательность из матрицы

18.06.2019, 00:32. Показов 1443. Ответов 2
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
Дана действительная матрица размера nxm. Получить последовательность b1, ..., bn, где bk - это произведение квадратов тех элементов k-й строки, модули которых принадлежат отрезку [1;1,5].
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
18.06.2019, 00:32
Ответы с готовыми решениями:

Сформировать последовательность из четных элементов матрицы. Матрицу просматривать по столбцам
Сформировать последовательность из четных элементов матрицы. Матрицу просматривать по столбцам.

Сформировать последовательность из элементов матрицы
Всем привет. Данная действительна матрица с размерностью mxn. Получить последовательность b1 ......

Сформировать последовательность из элементов матрицы
Cоставить программу заданной обработки матрицы целых чисел. В процессе обработки...

Сформировать последовательность из четных элементов матрицы
Дана матрица.Сформировать последовательность из четных элементов матрицы. Матрицу расматривать по...

2
2373 / 775 / 561
Регистрация: 15.01.2019
Сообщений: 2,394
18.06.2019, 06:10 2
Лучший ответ Сообщение было отмечено Dimka_B как решение

Решение

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
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
program Project1;
var
  i,j: integer;   // Вспомогательные переменные для организации циклов.
  n,m: integer;   // Переменные для хранения значений количества строк и столбцов.
  vib: integer;    // Вспомогательная переменная для выбора режима заполнения матрицы.
  a: array [1..10,1..10] of real;  // Переменная для хранения массива.
  pow: real;    // Переменная для хранения значения произведения.
  reg: boolean;  // Вспомогательная переменная для организации ответа.
begin
  Writeln('Введите значение количества строк:');
  Readln(n);
  Writeln('Введите значение количества столбцов:');
  Readln(m);
  Writeln('Введите 1, если ввод чисел будет осуществляться в ручном режиме');
  Writeln('Введите 2, если числа будут заданы генератором случайных чисел');
  Readln(vib);
  case vib of
  1: for i:= 1 to n do  // Циклы для перебора индексов двумерного массива.
      for j:= 1 to m do
       begin
        writeln('Введите элемент ',i,' строки ',j,' столбца.');
        Readln(a[i,j]);
       end;
  2: for i:=1 to n do  // Циклы для перебора индексов двумерного массива.
      for j:=1 to m do
        a[i,j]:= (random(51) - 25)/10; //  Заполнение массива случайными действительными числами.
 end;
 for i:= 1 to n do      // Циклы для перебора индексов двумерного массива.
    begin
    for j:= 1 to m do
      Write(a[i,j]:5:1);   //  Вывод массива на экран.
    writeln;
    end;
 Writeln ('Произведение квадратов элементов, модули которых принадлежат отрезку [1;1.5]:');
 for i:= 1 to n do  // Циклы для перебора индексов двумерного массива.
   begin
   pow:= 1;       // Установка переменной в начальное состояние.
   reg:= false;   // Установка переменной в начальное состояние.
   for j:= 1 to m do
     if (abs(a[i,j]) >= 1) and (abs(a[i,j]) <= 1.5) then // Условие проверки значения элемента вхождению в интервал.
       begin
         pow:= pow * (a[i,j]*a[i,j]); // Вычисление произведения.
         reg:= true;                  // Регистрация нахождения элемента, подходящего под условия.
       end;
   if reg then  //  Если элемент найден, то выводиться первый ответ.
     writeln(i,'строчка: ',pow:6:2)
   else    //  Если элемент не найден, то выводиться второй ответ.
     writeln('Таких чисел в ',i,' строчке нет.')
   end;
 
Readln;
end.
1
0 / 0 / 0
Регистрация: 17.06.2019
Сообщений: 15
18.06.2019, 08:16  [ТС] 3
Невероятно вам благодарен. Спасибо большое!
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
18.06.2019, 08:16
Помогаю со студенческими работами здесь

Сформировать последовательность из чётных элементов матрицы
Сформировать последовательность из чётных элементов матрицы.Матрицу просматривать по строкам

Сформировать последовательность 0 и 1, на основе строк квадратной матрицы
Пусть даны натуральное число n и символьная квадратная матрица порядка n. Получите...

Сформировать последовательность из MAX элементов чётных строк матрицы
Дана матрица. Сформировать последовательность из MAX элементов чётных строк матрицы.

Сформировать массив, в котором B(i)=1, если элементы i-ой строки матрицы составляют возрастающую последовательность
Дана матрица A(M,N).Сформировать одномерный массив B(N),в котором B(i)=1, если элементы i-ой строки...


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

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

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru