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

Определить и вывести количество чисел в квадратной матрице, которые встречаются во всех строках

09.12.2012, 23:41. Показов 1253. Ответов 1
Метки нет (Все метки)

Заполнить квадратную матрицу размером 5х5 элементов.Определить и вывести количество чисел, которые встречаются во всех строках матрицы, вывести также сами числа.
__________________
Помощь в написании контрольных, курсовых и дипломных работ, диссертаций здесь
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
09.12.2012, 23:41
Ответы с готовыми решениями:

Найти все буквы заданных строк, которые встречаются во всех этих строках
Найти все буквы заданных строк, которые встречаются во всех этих строках.

Найти все буквы заданных строк, которые встречаются во всех этих строках.
Найти все буквы заданных строк, которые встречаются во всех этих строках.

Вывести на экран только те символы, которые встречаются в обеих строках одновременно
Даны две строки А и В, которые содержат только маленькие и большие буквы русского и английского...

В символьной матрице найти гласные буквы, которые присутствуют во всех строках
Строки, записи, множества. В заданном двумерном символьном массиве, найти все гласные буквы,...

1
142 / 148 / 116
Регистрация: 15.11.2012
Сообщений: 537
Записей в блоге: 2
10.12.2012, 14:06 2
Лучший ответ Сообщение было отмечено Qantrox1 как решение

Решение

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
const n=5; m=10;
var
a: array [1..n,1..n] of integer;
b,c: array [1..m] of integer;
d: array [1..m] of boolean;
i,t,k: integer;
Begin
        repeat
        for i:=1 to m do begin
                d[i]:=true;
                c[i]:=0;
        end;
        randomize;
        for i:=1 to n do begin
           for k:=1 to n do begin
                a[i,k]:=random(9)+1;
                write(a[i,k]:4);
                t:=a[i,k];
                b[t]:=b[t]+1;
                c[t]:=c[t]+1;
           end;
           writeln;
           for t:=1 to m do begin
                if b[t]=0 then d[t]:=false;
                if b[t]>0 then d[t]:=d[t] and true;
                b[t]:=0;
           end;
        end;
        for i:=1 to m do
                if d[i] then write('число - ',i,' повторений - ',c[i]);
                writeln; 
        readln;
        until false;
End.
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
10.12.2012, 14:06
Помогаю со студенческими работами здесь

Определить в матрице количество элементов, которые встречаются один раз
Эта программа решает задачу несколько шире, чем говорится в заголовке темы. В программе...

В квадратной матрице определить количество столбцов упорядоченных по убыванию и вывести их номера
В квадратной матрицt A определить количество столбцов упорядоченных по убыванию и вывести их...

Вывести слова, которые встречаются в обеих строках
Даны две символьные строки. Слово - последовательность символов между пробелами, не содержащая...

Вывести слова, которые встречаются в обеих строках
Даны две символьные строки. Слово - последовательность символов между пробелами, не содержащая...


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

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

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