На двумерный массив в pascal! вводится массив n*n и число k. вывести номер строки, сумма элементов которой равна или наиболее близка к сумме элементов столбца с номером k.
186
359
Ответы на вопрос:
Const n=8; var a: array[1..n,1..n] of integer; i,j,k,s,s1,si,dmin,smin: integer; begin randomize; writeln('исходный массив: '); for i: =1 to n do begin for j: =1 to n do begin a[i,j]: =random(50); write(a[i,j]: 4); end; writeln; end; write('k = '); readln(k); s: =0; for j: =1 to n do s: =s+a[k,j]; writeln('s = ',s); dmin: =999999; smin: =999999; for i: =1 to n do if i< > k then begin s1: =0; for j: =1 to n do s1: =s1+a[i,j]; writeln('s',i,' = ',s1); if abs(s1-s)< dmin then begin dmin: =abs(s1-s); smin: =s1; si: =i; end; end; writeln('номер строки = ',si,', smin = ',smin); end. пример: исходный массив: 9 0 22 40 20 35 2 25 23 30 22 35 41 0 9 40 1 15 6 18 43 47 34 33 26 5 2 45 13 46 40 2 26 39 7 31 3 43 20 8 25 15 24 6 10 16 3 25 47 0 27 35 14 15 36 11 16 38 14 14 33 7 11 26 k = 5 s = 177 s1 = 153 s2 = 200 s3 = 197 s4 = 179 s6 = 124 s7 = 185 s8 = 159 номер строки = 4, smin = 179
Прежде всего переведем скорость из бит/с в кбайт/с 1 байт/с=8 бит/с 512000/8=64000 байт/с 1 кбайт/с=1024 байт/с 64000/1024=62,5 кбайт/с - скорость передачи 62,5*8=500 кбайт - размер файла
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
Nottyt20.02.2023 22:28
-
xomahgf10.06.2023 07:22
-
Nurbibi1227.03.2020 21:31
-
kiskaignatushkina08.03.2021 16:10
-
17Стася1712.02.2022 23:10
-
vadimgofman11.03.2021 21:29
-
Bakuninalexander01.03.2023 14:22
-
Софи1234567890я23.10.2020 06:24
-
Andrey335529.11.2022 14:14
-
Анёк1113.09.2022 00:38
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.