Есть ответ 👍

с информатикой, нужно построить таблицу истинности,

174
479
Посмотреть ответы 2

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


Слалщу9ц929383кщлс899взьситил4щ8292цздчь ьмлп


// pascalabc.net 3.1, сборка 1219 от 16.04.2016 type   matrix=array[,] of integer; procedure matprint(a: matrix); begin   var m: =length(a,1)-1;   for var i: =0 to length(a,0)-1 do begin       for var j: =0 to m do write(a[i,j]: 4);       writeln       end end; function isequal(a: matrix; col: integer): boolean; begin   var s: =sign(a[0,col]);   for var i: =1 to length(a,0)-1 do s+=sign(a[i,col]);   if (s=0) then result: =(a[0,col]< > 0)   else result: =false end; procedure deletecol(var a: matrix; col: integer); begin   var n: =length(a,0)-1;   var m: =length(a,1)-1;   for var j: =col+1 to length(a,1)-1 do       for var i: =0 to n do a[i,j-1]: =a[i,j];   setlength(a,n+1,m) end; begin   var n: =readinteger('строк: ');   var m: =readinteger('столбцов: ');   var a: =matrixrandom(n,m,-99,99);   writeln('исходная матрица');   matprint(a);   for var j: =length(a,1)-1 downto 0 do       if isequal(a,j) then deletecol(a,j);   writeln('результирующая матрица');   matprint(a);   end. тестовое решение строк: 8 столбцов: 10 исходная матрица   -3 -82 -25 -22  65    1  79 -67 -64 -82   17  36  48 -32  51  11  43    9 -35    4   -10  -5  80  82 -24  66 -12 -58  50 -94   52  70  53  85 -32 -59  46  57 -84 -44   81  71 -55  37  46 -15 -61  25  22  -7   -49  98 -42 -18 -44 -97 -63  -7 -98  99   -86  37 -17 -69 -35  46  82  62  99  11   65  85  -7 -90  23  19 -50 -56 -64  91 результирующая матрица   -82 -25 -22    1 -64   36  48 -32  11 -35   -5  80  82  66  50   70  53  85 -59 -84   71 -55  37 -15  22   98 -42 -18 -97 -98   37 -17 -69  46  99   85  -7 -90  19 -64

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

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

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

Caktus Image

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

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

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

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

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

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

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

GTP TOP NEWS