Задать вопрос Регистрация
Помочь другим

  • . Составить программу, которая подсчитывает для каждого столбца массива А[1..5, 1..6] сумму значений элементов и формирует из полученных сумм одномерный массив B[1..6].

Ответы 1

  • Программа на Паскале:

    Program a1;

    Var i, j : integer;

          s : real;

          a: array [1..5, 1..6] of real;

          b: array [1..6] of real;

    Begin

      For i:=1 to 5 do

        For j:=1 to 6 do

           readln(a[i,j]);

      For j:=1 to 6 do

        Begin

           s:=0;

           For :=1 to 5 do

               s:=s+a[i,j];

           b[j]:=s

        end;

     Write ('Полученный массив В:');

     For j:=1 to d do

        write(b[j]);

     readln

    End. 

  • Добавить свой ответ

Еще вопросы

Топ пользователей

Войти через Google

 или

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

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

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