Developing.ru

Код: Выделить всё

#include <stdio.h>
#include <iostream.h>
#include <math.h>
#include <stdlib.h>
#include <conio.h>
#include <iomanip.h>
#define n 100
/*program laborat1.cpp
программа решает следующую задачу:
Дана вещественная матрица А размером m*n.
Обозначим  M(i,j) матрицу размером (m-1)*(n-1),
получаемую из матрицы А выбрасыванием i-й строки и j-го столбца.
Построить  матрицу В, где каждый элемент b(i,j)
равен наименьшему из элементов матрицы M(i,j).
*/

int main()
   {
          double min(float a ;int o,p);
          int i1,j1;
          {
              const int m=26;
              int n,i,j,k,l;
              int a[i][j],b[i][j];
    for (i1=1 ;i1<=n i1++)
    for (j1=1; j1<=n;j1++)
    {
      if ((a1[i1,j1]< m)&&((i1<>o) &&(j1<>p))) 
       {
                       m=a1[i1][j1];
                       min=m;
}
}
cout<<"vvedite razmernost matrix";
cin>>n;
  Randomize();
  for (i=1;i<=n;i++)
  for (j=1;j<=n;j++) 
      a[i][j]=rand%100;

  cout <<"matrix A" <<endl;
  for (i=1;i<=n;i++)
  {
    for (j=1;j<=n;j++)
      cout<<"%3a",a[i][j];
  cout<<endl;
}

  for (k=1;k<=n;k++)
  for (l=1;l<=n;l++)
    {
      b[k][l]=min(a,k,l);
}

  
  for (i=1;i<=n;i++)
  {
    cout<<endl;
    for (j=1;j<=n;j++)
    cout<<"%3a",b[i][j];
    cout<<endl;
   }

  
  return(0);
}

Код: Выделить всё

type matrix= array[1..100,1..100] of Integer;
{const n=100;}
var
  n,i,j,k,l:Integer;
  a,b:matrix ;
  function min(var a1:matrix; o,p:integer):integer;
  var
    i1,j1:Integer;
    m:Integer;
  begin
    m:=26;
    for i1:=1 to n do
    for j1:=1 to n do
      if (a1[i1,j1]< m) and ((i1<>o) and (j1<>p)) then
        m:=a1[i1,j1];
    min:=m
  end;
begin
writeln('vvedite razmernost matrix');
readln(n);
  Randomize;
  for i:=1 to n do
  for j:=1 to n do
    a[i,j]:=Random(25);

   writeln('matrix A');
  for i:=1 to n do begin
  for j:=1 to n do
      write(a[i,j]:3);
    
    Writeln;
  end;


  for k:=1 to n do
  for l:=1 to n do
    begin
      b[k,l]:=min(a,k,l)
    end;
   writeln;
  writeln('matrix B');
  for i:=1 to n do begin
  for j:=1 to n do
      write(b[i,j]:3);
   
    Writeln;
  end;

  
  Readln;
end.

Код: Выделить всё

#include <stdlib.h>
#include <stdio.h>
#include <time.h>

int n, i, j, k, l;
int a[100][100];
int b[100][100];

int min(int * al, int o, int p)
{
	int il, jl;
	int m = 26;
	for (il = 0; il < n; il++)
	{
		for (jl = 0; jl < n; jl++)
		{
			if ((al[il * 100 + jl] < m) && (il != o) && (jl != p))
			{
				m = al[il * 100 + jl];
			}
		}
	}
	return m;
}

int main(int argc, char * argv[])
{
	printf("vvedite razmernost matrix\n");
	scanf("%d", &n);
	srand(time(0));
	for (i = 0; i < n; i++)
	{
		for(j = 0; j < n; j++)
		{
			a[i][j] = rand() % 25;
		}
	}
	printf("matrix A\n");
	for (i = 0; i < n; i++)
	{
		for(j = 0; j < n; j++)
		{
			printf("%d ", a[i][j]);
		}
		printf("\n");
	}
	for (k = 0; k < n; k++)
	{
		for(l = 0; l < n; l++)
		{
			b[k][l] = min(&a[0][0], k, l);
		}
	}
	printf("matrix B\n");
	for (i = 0; i < n; i++)
	{
		for(j = 0; j < n; j++)
		{
			printf("%d ", b[i][j]);
		}
		printf("\n");
	}
	return EXIT_SUCCESS;
}