• 30 баллов!!! помогите срочно!!!

    В программе описан двумерный массив A следующим образом
    const N=5; M=6;
    Type ARR=array[1..N,1..M] of integer;
    var A: ARR;

    Определить, как изменится в программе массив в результате вызова процедуры PAR(A).
    procedure PAR(var A:ARR):
    var I,J,MAXA,MINA,MAXI,MINI,B: integer;
    begin MAXA:=A[1,1]; MINA:=A[1,1]; MAXI:=1; MINI:=1;
    for I:=1 to N do
    for J:=1 to M do
    if A[I,J]>MAXA then
    begin MAXA:=A[I,J]; MAXI:=I end
    else if A[I,J] begin MINA:=A[I,J]; MINI:=I end;
    if MAXI<>MINI then
    for J:=1 to M do
    begin B:=A[MAXI,J]; A[MAXI,J]:=A[MINI,J]; A[MINI,J]:=B end
    end;

Ответы 3

  • то есть?
    • Автор:

      deanna
    • 5 лет назад
    • 0
  • блииин, напишите словами, пожалуйста, не дружу с прграммированием!
  • ВОТ ЧТО ПОЛУЧИТСЯ begin B:=A[MAXI,J]; A[MAXI,J]:= PAR(var A:ARR):
  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years