• Помогите решить, пожалуйста! Хотя бы некоторые задачи.
    1. Найти сумму (произведение) элементов 1-й строки (столбца) массива Т (6,4).
    2. Заполните матрицу, элементами которой является произведение номеров строк и столбцов соответствующих элементов.
    3. Вычислить сумму и произведения элементов матрицы Z (4,6).
    4. Вычислить сумму и произведение элементов матрицы А(5,5).
    Язык программирования - Pascal.

Ответы 4

  • Вот теперь ответ неполный... и все это удалят...
    • Автор:

      grant87f8
    • 5 лет назад
    • 0
  • И Горыныч пролетит на 80+20 баллов
    • Автор:

      cash920
    • 5 лет назад
    • 0
  • А человек старался, помочь хотел. А разбили бы на 2 задания... одно бы осталось решенным
  • 2)const N=8;M=10;var p:array[1..N,1..M] of integer;i,j:integer;begin for i:= 1 to N do   for j:=1 to M do  begin   p[i,j]:=i*j;  write(p[i,j],' ')  end; end.3)const N=4;M=6;var z:array[1..N,1..M] of integer;i,j,sum,pr:integer;beginrandomize;sum:=0;pr:=1;   for i:= 1 to N do      for j:=1 to M do   begin z[i,j]:=random(100);   write(z[i,j],' ');    sum:=sum+z[i,j];    pr:=pr*z[i,j]; end; writeln(); write('сумма ',sum,' произведение ',pr); end.4)const N=5;M=5;var a:array[1..N,1..M] of integer;i,j,sum,pr:integer;beginrandomize;sum:=0;pr:=1; for i:= 1 to N do   for j:=1 to M do   begin a[i,j]:=random(100);   write(a[i,j],' ');    sum:=sum+a[i,j];    pr:=pr*a[i,j]; end; writeln(); write('сумма ',sum,' произведение ',pr); end.
  • Добавить свой ответ

Войти через Google

или

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

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

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