М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
NastyaZayatc12
NastyaZayatc12
23.09.2020 14:26 •  Информатика

Дан двумерный массив размером 6×6, заполненный целыми числами с клавиатуры. найдите наименьший элемент среди элементов главной диагонали.​

👇
Ответ:
морж14
морж14
23.09.2020

PascalABC.NET

begin

 var n := 6;

 var a := ReadMatrInteger(n, n);

 var min := a[0, 0];

 for var i := 1 to n - 1 do

   if a[i, i] < min then

     min := a[i, i];

 Print('Минимальный элемент главной диагонали равен', min)

end.

4,8(29 оценок)
Открыть все ответы
Ответ:
ahmedova3
ahmedova3
23.09.2020
Var  
i, j, k : integer; 
 a : array [0..9,0..9] of char; 
procedure U(i,j:integer);  
var c : char; 
begin 
 c:=a[i,j]; a[i,j]:=' ';  
if (c='W')and(a[i+1,j]='B') then U(i+1,j);
  if (c='B')and(a[i+1,j]='W') then U(i+1,j); 
 if (c='W')and(a[i-1,j]='B') then U(i-1,j); 
 if (c='B')and(a[i-1,j]='W') then U(i-1,j); 
 if (c='W')and(a[i,j+1]='B') then U(i,j+1);  
if (c='B')and(a[i,j+1]='W') then U(i,j+1); 
 if (c='W')and(a[i,j-1]='B') then U(i,j-1); 
 if (c='B')and(a[i,j-1]='W') then U(i,j-1); 
end; 
begin  
assign(input,'input.txt');
reset(input); 
 assign(output,'output.txt');
 rewrite(output);  
for i:=1 to 8 do begin  for j:=1 to 8 do
 read(a[i,j]); 
 readln  
end;  
for i:=1 to 8 do
 begin 
 a[0,i]:=' '; a[9,i]:=' ';  a[i,0]:=' '; a[i,9]:=' '  
end; 
 k:=0; 
 for i:=1 to 8 do 
 for j:=1 to 8 do 
 if a[i,j]<>' ' then
begin 
 k:=k+1; U(i,j)  
end;  
write(k); 
 close(output) 
end. 
4,7(25 оценок)
Ответ:
imhopro
imhopro
23.09.2020

#include <iostream>

using namespace std;

int main() {

const int M = 3;

const int N = 4;

int matrix [M][N] = {};

int k,s=0,pr=1;

cout << "Введите k:" << endl;

cin >> k;

for (int i = 0; i < M; i++) { //забиваем матрицу случайными числами

 for (int j = 0; j < N; j++) {

  matrix[i][j] = rand() % 10;

 }

}

for (int i = 0; i < M; i++) { //находим сумму и произведение

 s += matrix[i][k-1];

 pr *= matrix[i][k-1];

}

for (int i = 0; i < M; i++) { //выводим матрицу на экран

 for (int j = 0; j < N; j++) {

  cout << matrix[i][j] << " ";

 }

 cout << endl;

}

cout << s << endl << pr; //выводим на экран сумму и произведение элементов

return 0;

}

4,5(39 оценок)
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ