• 7.Найти
    произведение двух квадратных матриц А(3*3) и В(3*3).

    9.Дан массив
    А(3*4). Найти номера всех максимальных элементов в каждой строке.

    10.Дан массив
    А(3*4). Найти в каждой строке сумму элементов, кратных 3.



    11.Дан массив
    А(3*4). Найти количество элементов в каждой строке, больших среднего
    арифметического элементов данной строки.

    паскаль

Ответы 2

  • Program asd;USES crt;Const n=3;Const m=4;var A:array[1..n,1..m] of integer;i,j,p,s:integer;BEGINClrscr;For i:=1 to n dobeginfor j:=1 to m dobeginA[i,j]:=random(10);Write(' ',A[i,j]:2)end;Writeln;end;Writeln;For i:=1 to n dobeginS:=0;for j:=1 to m doif A[i,j] mod 3=0 thenbeginS:=S+A[i,j];end;Writeln(' Symma v stro4ke ',i,': ',s);end;END.
    • Автор:

      raulvd0z
    • 5 лет назад
    • 0
  • это была 10-я
    • Автор:

      proctor
    • 5 лет назад
    • 0
  • Добавить свой ответ

Войти через Google

или

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

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

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