Здравствуйте, уважаемые эксперты вас с написанием кода для программы: Для матрицы из 4 столбцов и 4 строк найти минимальный элемент среди элементов побочной диагонали и его индексы. Тема задания «Обработка двумерных массивов в системе Lazarus»
#include <iostream> using namespace std; int main() { cout<<–2013<<" "<<21<<" "<<56<<endl; cout<<–2.034<<" "<<1.15<<" "<<5.36<<endl; cout<<"– 2 0 1 5"<<endl; cout<<"Наступил 2015 год"<<endl; cout<<"Поздравляю Всех с Новым"<<endl<<"2 0 1 5"<<endl<<"годом !"<<endl; cout<<"Выполнила задание"<<endl<<"Радченко Мария Александровна"<<endl <<"слушатель группы ЗМС-14-4"<<endl; system("PAUSE"); return 0; }
Результат выполнения программы: -2013 21 56 -2.034 1.15 5.36 - 2 0 1 5 Наступил 2015 год Поздравляю Всех с Новым 2 0 1 5 годом ! Выполнила задание Радченко Мария Александровна слушатель группы ЗМС-14-4 Для продолжения нажмите любую клавишу . . .
program z1;
var a: array [1..4,1..4] of integer;
i,j,k,mi,mj: integer;
begin
mi:=0;
mj:=0;
k:=0;
for i:=1 to 4 do
begin
for j:=1 to 4 do
begin
a[i,j]:=random(90)+10;
write(a[i,j],' ');
if i+j=5 then
begin
if k=0 then
begin
mi:=i;
mj:=j
end;
if a[i,j]<a[mi,mj] then
begin
mi:=i;
mj:=j
end;
k:=1
end
end;
writeln
end;
writeln ('a[',mi,',',mj,']=',a[mi,mj]);
end.