Предмет: Информатика,
автор: Shkolyarok
Дан массив В(n*m) ).Элементы массива ввести с клавиатуры.Найти последний положительный элемент и его индексы.
Ответы
Автор ответа:
0
var a: array [1..100,1..100] of integer;
var i,j,m,n: integer;
var poz1,poz2: integer;
begin
read(n,m);
for i := 1 to n do
for j := 1 to m do
read(a[i,j]);
for i := 1 to n do
for j := 1 to m do
if ( a[i,j]>0) then begin
poz1:=i ; poz2:=j;
end;
writeln('poslenyi ', a[poz1,poz2]);
writeln('index',poz1,' ; ',poz2);
end.
var i,j,m,n: integer;
var poz1,poz2: integer;
begin
read(n,m);
for i := 1 to n do
for j := 1 to m do
read(a[i,j]);
for i := 1 to n do
for j := 1 to m do
if ( a[i,j]>0) then begin
poz1:=i ; poz2:=j;
end;
writeln('poslenyi ', a[poz1,poz2]);
writeln('index',poz1,' ; ',poz2);
end.
Автор ответа:
0
все понял, просто запись странная
Автор ответа:
0
сорри) с С++ описание чутка перепутал. уже исправил
Автор ответа:
0
все должно работать) прости я на с++ сейчас пишу. и код чутка напутал. все проверил. должно быть норм
Автор ответа:
0
работает, спасибо ;)
Автор ответа:
0
поставь "лучшее решение" и тебе вернутся баллы;) спасибо
Похожие вопросы
Предмет: Алгебра,
автор: Dastedson1
Предмет: Математика,
автор: kambala04
Предмет: Геометрия,
автор: Rxjibdk
Предмет: Алгебра,
автор: Kolya7771
Предмет: География,
автор: masha1479