Есть ответ 👍

Дана матрица a(n, m). получить вектор x(m), равный p-ой строке матрицы.

189
401
Посмотреть ответы 3

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


// pascalabc.net 3.2, сборка 1382 от 06.02.2017 // внимание! если программа не работает, обновите версию! begin   var n: =readinteger('количество строк в массиве: ');   var m: =readinteger('количество столбцов в массиве: ');   writeln('*** исходный массив [',n,',',m,'] ***');   var a: =matrrandom(n,m,-99,99);   a.println(4); writeln(4*a.colcount*'-');   var p: =readinteger('номер строки для формирования вектора: ');   var x: =a.row(p-1); x.println end. пример: количество строк в массиве: 6 количество столбцов в массиве: 9 *** исходный массив [6,9] ***   25 -94  49  38  93    6  76  61 -79   49  25 -82 -43 -92 -51 -78  62    4   -31  43 -78 -34  48  19 -17 -26 -98   82  44 -43  36  82  50 -14  39 -87   88 -25  12 -94 -96  68    7    9 -28   96  38 -15 -77 -99 -78 -60 -21  57 номер строки для формирования вектора: 4 82 44 -43 36 82 50 -14 39 -87

Program prog; uses crt; var a: array [0..100, 0..100] of integer;       x: array [0..100] of integer;       n,m,p,i,j: integer;       begin; clrscr; randomize; write('n = '); readln(n); write('m = '); readln(m); write('p = '); readln(p); writeln; for i: =1 to n do begin       for j: =1 to m do               begin               a[i,j]: = random(101)-50;               write(a[i,j]: 5);                             if (i=p) then               x[j]: = a[i,j];               end;       writeln; end; writeln; for j: =1 to m do write(x[j]: 5); end.
VikaPikcha
4,7(61 оценок)

Program vladimir37005; const n=5; var a: array[1..n] of integer;           i,min,k: integer; begin for i: =1 to n do begin write('a[',i,']='); read(a[i]); end; min: =a[1]; k: =1;   for i: =1 to n do if (a[i] < min)  then  begin  min: =a[i]; k: =i;   end;   for i: =1 to n do if (a[i] < 0) and (a[i] > min)  then begin  min: =a[i]; k: =i; end; a[k]: =0; for i: =1 to n do write(a[i],' '); end.

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

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

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

Caktus Image

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

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

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

    Проект находиться на стадии тестирования и все услуги бесплатны.
  • Могу ли я использовать otvet5GPT в школе?

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

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

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

GTP TOP NEWS