Форум программистов, компьютерный форум, киберфорум
Наши страницы
Turbo Pascal
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.80/5: Рейтинг темы: голосов - 5, средняя оценка - 4.80
haim08
0 / 0 / 0
Регистрация: 10.01.2012
Сообщений: 35
1

Даны две матрицы. Есть ли в них одинаковые строки?

10.01.2012, 16:06. Просмотров 873. Ответов 1
Метки нет (Все метки)

Даны две матрицы. Есть ли в них одинаковые строки? Помогите срочно надо Пожалуйста!
0
Лучшие ответы (1)
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
10.01.2012, 16:06
Ответы с готовыми решениями:

Даны две матрицы.Есть ли в них одинаковые столбцы?
Pascal.Даны две матрицы.Есть ли в них одинаковые столбцы?Очень надо для...

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

Даны 2 целых числа. Есть ли у них одинаковые(по значению) разряды?
Даны 2 целых числа. Есть ли у них одинаковые(по значению) разряды?

Даны две квадратные матрицы. Напечатать ту из них, которая имеет минимальный след
Даны две квадратные матрицы. Напечатать ту из них, которая имеет минимальный...

Даны две квадратные матрицы. Напечатать ту из них, которая имеет минимальный след
Даны две квадратные матрицы. Напечатать ту из них, которая имеет минимальный...

1
WebMax 2.0
--\.founder./--
562 / 562 / 392
Регистрация: 20.10.2011
Сообщений: 867
10.01.2012, 16:16 2
Лучший ответ Сообщение было отмечено haim08 как решение

Решение

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
Program Matrica_Readln;
 
Uses crt;   // подключаем модули
 
Type
mat = array [1..100,1..100] of integer ;
 
var
a,b:mat; // переменная массива
i,j,m,n,x:integer; // индексы массива и т.д.
 
begin // начало основной программы
 
 clrscr;   // очищает текстовое окно
//------------------------------------------------------------------------------ // формируем матрицу
 Write('Количество строк матрицы А,B (до 100) - ');readln(m);   // вводим необходимое кол-во строк массива
 Write('Количество столбцов матрицы А,B(до 100) - ');readln(n);  // вводим необходимое кол-во столбцов массива
 
 Writeln('Заполните матрицу А,B');
 For i:=1 to m do    // цикл для перебора всех строк
    For j:=1 to n do   // перебор всех элементов строки по столбцам
       begin
       Write('a[',i,',',j,'] = '); readln(a[i,j]);  // ввод с клавиатуры элемента, стоящего в i -й строке и j -м столбце
       Write('b[',i,',',j,'] = '); readln(b[i,j]);  // ввод с клавиатуры элемента, стоящего в i -й строке и j -м столбце
       end;
 
 Writeln('Одинаковые строки:');
 For i:=1 to m do    // цикл для перебора всех строк
 begin
 x:=0;
    For j:=1 to n do   // перебор всех элементов строки по столбцам
    If a[i,j]=b[i,j] then inc (x);
 If x=n then writeln(i,'-е строки одинаковые.')
 end;
 readkey; // читает символ из буфера клавиатуры.
 
end.
1
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
10.01.2012, 16:16

Даны две квадратные матрицы.Напечатать квадрат той из них,в который наименьший след.
Заранее спасибо!!!

Даны 3 матрицы. Проверить, есть ли хотя бы в одной из них отрицательный элемент
Здравствуйте. Помогите, пожалуйста, написать программу на Паскале: Даны 3...

Заданы две строки. Определить, есть или нет в них общие слова
Заданы две строки. Определить, есть или нет в них общие слова. Решите...


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

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

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