На шоссе расположены пункты k и r , удалённые друг от друга на 74 км. мотоциклист выехал из пункта r в направлении, противоположном k , со скоростью 53 км/ч. составь модель, описывающую положение мотоциклиста относительно пункта k через t часов. ответ: s= *t+ , t ≥ ⋅

Const   n=7; var   a: array[1..n,1..n] of integer;   i,j,imax,jmax: integer; begin   randomize;   imax: =1; jmax: =1;   writeln('исходный массив');   for i: =1 to n do begin       for j: =1 to n do begin           a[i,j]: =random(90)+10;           write(a[i,j]: 3);           if a[i,j]> a[imax,jmax] then               begin imax: =i; jmax: =j end;           end;       writeln   end;   writeln('max[',imax,',',jmax,']=',a[imax,jmax]) end. тестовое решение исходный массив   76 22 34 68 78 87 98   67 76 68 10 70 63 68   78 83 88 38 89 83 88   41 70 55 59 34 37 86   48 55 86 64 98 92 59   14 47 94 74 99 15 52   35 91 31 89 31 16 91 max[6,5]=99

//pascal abc.net сборка 1256 const   n=7; var   ma: array[1..n,1..n] of integer;   i,j,max,maxi,maxj: integer; begin randomize; max: =-1; writeln('matrix: ');   for i: =1 to n do   begin     for j: =1 to n do     begin       ma[i,j]: =random(1000);       write(ma[i,j]: 4);       if max< ma[i,j] then       begin         max: =ma[i,j];         maxi: =i;         maxj: =j;       end;     end;     writeln;   end; writeln('max=',max); writeln('строка: ',maxi); write('столбец: ',maxj); end.