Регистрация Спросить otvet5GPT
supercrud
28.09.2022 04:25
Информатика
Есть ответ 👍

Синформатикой! заранее большое ! необходимое : написать программу,которая выводит суммы главной диагонали, верхней треугольной матрицы и нижней треугольной. язык )

277
458
Посмотреть ответы 3

Ответы на вопрос:

Volkov1822
Volkov1822
4,6(2 оценок)
// pascalabc.net 3.3, сборка 1627 от 27.01.2018 // внимание! если программа не работает, обновите версию! begin   var n: =readinteger('количество строк (столбцов) в матрице: ');   writeln('*** исходная матрица ***');   var a: =matrrandom(n,n,-99,99);   a.println(4); writeln(4*a.colcount*'-');   var (su,sd,sl): =(0,0,0);   for var i: =0 to n-1 do       for var j: =0 to n-1 do           if i< j then su+=a[i,j]           else               if i=j then sd+=a[i,j]               else sl+=a[i,j];   writeln('суммы элементов: ');   writeln(' - верхней треугольной матрицы ',su);   writeln(' - главной диагонали ',sd);   writeln(' - нижней треугольной матрицы ',sl) end. пример количество строк (столбцов) в матрице: 4 *** исходная матрица ***   -73 -89    4  39   77 -32  23 -45   -29 -70 -88 -40   -83    9  21 -46 суммы элементов:   - верхней треугольной матрицы -108   - главной диагонали -239   - нижней треугольной матрицы -75 "школьный" вариант const   nn=20; { максимальный размер } var   a: array[1..nn,1..nn] of integer;   i,j,n: integer;   su,sd,sl: longint;   begin   write('количество строк (столбцов) в матрице: ');   readln(n);   randomize;   writeln('*** исходная матрица ***');   su: =0; sd: =0; sl: =0;   for i: =1 to n do begin       for j: =1 to n do begin           a[i,j]: =random(199)-99;           write(a[i,j]: 4);           if i< j then su+=a[i,j]           else               if i=j then sd+=a[i,j]               else sl+=a[i,j]           end;           writeln       end;   writeln('суммыа элементов: ');   writeln(' - верхней треугольной матрицы ',su);   writeln(' - главной диагонали ',sd);   writeln(' - нижней треугольной матрицы ',sl) end.
SteveDog86
SteveDog86
4,4(81 оценок)
C++ #include < iostream> #include < cstdlib> #include < ctime> using namespace std; int main(){ srand(time(0)); int mas[5][5]; int sum=0,sum1=0,sum2=0; for(int i=0; i< 5; i++){ for(int j=0; j< 5; j++){ mas[i][j]=10+rand()%50; } } for(int i=0; i< 5; i++){ for(int j=0; j< 5; j++){ if(i==j)sum+=mas[i][j]; if(i> j)sum1+=mas[i][j]; if(i< j)sum2+=mas[i][j]; } } for(int i=0; i< 5; i++){ for(int j=0; j< 5; j++){ cout< < mas[i][j]< < " "; } cout< < endl; } cout< < endl; cout< < sum< < " "< < sum1< < " "< < sum2< < endl; return 0; }
irochka320969
irochka320969
4,5(74 оценок)
Начало (овал)           i   (параллелограмм)           i           write('введите n = '); readln(n);                                             (прямоугольник)writeln('исходный массив x: ');             i           for i: =1 to n do  then s: =s+x[i]; end;             i if x[i]< 0       (ромб, от него две стрелки "да" и  "нет")       i да                                 i нет then s: =s+x[i];             end;                           (прямоугольник)          

Реши свою проблему, спроси otvet5GPT

  • Быстро
    Мгновенный ответ на твой вопрос
  • Точно
    Бот обладает знаниями во всех сферах
  • Бесплатно
    Задай вопрос и получи ответ бесплатно

Популярно: Информатика

Caktus Image

Есть вопросы?

  • Как otvet5GPT работает?

    otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса.

  • Сколько это стоит?

    Проект находиться на стадии тестирования и все услуги бесплатны.

  • Могу ли я использовать otvet5GPT в школе?

    Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое!

  • В чем отличия от ChatGPT?

    otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.

Подпишись на наш телеграмм канал

GTP TOP NEWS