
#include <iostream>
using namespace std;
int main()
{
int a[3][3],i,j,max,min,imax,jmax,imin,jmin;
for (i=0;i<3;i++) // Ввод массива
{
for (j=0;j<3;j++)
{
cin >> a[i][j];
}
}
cout << "Введенный массив: " << endl;
for (i=0;i<3;i++) // Вывод массива
{
for (j=0;j<3;j++)
{
cout << a[i][j] << " ";
}
cout << endl;
}
max = a[0][0];
min = a[0][0];
for (i=0;i<3;i++) // Поиск макс. и мин. элементов
{
for (j=0;j<3;j++)
{
if (a[i][j] > max)
{
max = a[i][j];
imax = i;
jmax = j;
}
if (a[i][j] < min)
{
min = a[i][j];
imin = i;
jmin = j;
}
}
}
cout << "Максимальный элемент: " << max << " Его индексы: " << imax << " " << jmax << endl;
cout << "Минимальный элемент: " << min << " Его индексы: " << imin << " " << jmin;
}
Вывод программы:3 4 5 9 5 3 1 5 5 (Это ввод массива)
Введенный массив:
3 4 5
9 5 3
1 5 5
Максимальный элемент: 9 Его индексы: 1 0 (Нумерация с 0)
Минимальный элемент: 1 Его индексы: 2 0
program ;
var
i, a: longint;
x,
u, j,
n, m : longint;
function fdiv (a, left : longint) : longint;
var
d,
i : longint;
begin
d : = 1;
for i : = left to trunc (sqrt (a)) do
if (a mod i = 0)
then
begin
d : = i;
break;
end;
if (d < > 1)
then
fdiv : = d
else
fdiv : = a;
end;
function g (n, u : longint) : longint;
var
i : longint;
begin
i : = 0;
while (n mod u = 0)
do
begin
inc (i);
n : = n div u;
end;
g : = i;
end;
begin
assign (input, 'input.txt');
assign (output, 'output.txt');
reset (input);
read (a);
close (input);
m : = 0;
n : = 1;
i : = fdiv (a, 2);
u : = 2;
while (a > 1)
do
begin
n : = n * i;
j : = 0;
while (a mod i = 0)
do
begin
inc (j);
a : = a div i;
end;
if (j > m)
then
begin
m : = j;
u : = i;
end;
i : = fdiv (a, i + 2);
end;
x : = 1;
while (g (n * x, u) * n * x < m)
do
inc (x);
n : = n * x;
rewrite (output);
write (n);
close (output);
end.