Дан двумерный массив m*n , заполните его числами, найти наибольший элемент в каждой строке, вывести его значения и координаты. решить в pascal. перед тем как выкладывать ответ, проверьте решение.
Var mj,max,i,j,m,n:integer; mas:array[1..999,1..999] of integer;
begin randomize; readln(m,n); for i:=1 to m do for j:=1 to n do read(mas[i,j]); for i:=1 to m do begin mj:=-maxint; max:=-maxint; for j:=1 to n do if mas[i,j] > max then begin mj:=j; max:=mas[i,j]; end; writeln('[',i,';',mj,'] = ',max); end; end.
Если удалить из костюма элемент брюки, то он уже не будет костюмом. Если удалить из автомобиля элемент колёса, то без колёс автомобиль не поедит. Если удалить из компьютера элемент процессор, то он не будет больше компьютером. Если удалить из городской телефонной сети элемент электричество в городе, то сеть не будет ловить. Если удалить из школы элемент учитель, то это не будет школой. Если удалить из государства Президента, то кто будет править государством? Сущ.:Костюм, автомобиль, компьютер,школа. Несущ.:Городск. телеф. связь, государство.
#include <iostream> using namespace std; int main() { setlocale(0,""); // это что бы на русском было cout<<" Сижу за решеткой в темнице сырой."<<endl; cout<<"Вскормленный в неволе орел молодой,"<<endl; cout<<"Мой грустный товарищ, махая крылом,"<<endl; cout<<"Кровавую пищу клюет под окном,"<<endl; cout<<"Клюет, и бросает, и смотрит в окно,"<<endl; cout<<"Как будто со мною задумал одно;"<<endl; cout<<"Зовет меня взглядом и криком своим"<<endl; cout<<"И вымолвить хочет: «Давай улетим!"<<endl; cout<<"Мы вольные птицы; пора, брат, пора!"<<endl; cout<<"Туда, где за тучей белеет гора,"<<endl; cout<<"Туда, где синеют морские края,"<<endl; cout<<"Туда, где гуляем лишь ветер... да я!..»"<<endl; return 0; }
mj,max,i,j,m,n:integer;
mas:array[1..999,1..999] of integer;
begin
randomize;
readln(m,n);
for i:=1 to m do
for j:=1 to n do
read(mas[i,j]);
for i:=1 to m do
begin
mj:=-maxint;
max:=-maxint;
for j:=1 to n do
if mas[i,j] > max then
begin
mj:=j;
max:=mas[i,j];
end;
writeln('[',i,';',mj,'] = ',max);
end;
end.