Определите длину избыточного кода (тип кода задается) для передачи 28 знаков алфавита.(Код с четным числом «0».)
247
418
Ответы на вопрос:
// pascalabc.net 3.1, сборка 1201 от 18.03.2016 begin var n: =readinteger('n='); var m: =18; var a: =matrixrandom(m,n,-999,999); var imax: =0; var jmax: =0; for var i: =0 to m-1 do begin for var j: =0 to n-1 do begin write(a[i,j]: 5); if abs(a[i,j])> abs(a[imax,jmax]) then begin imax: =i; jmax: =j end end; writeln end; writeln('максимум по модулю а[',imax+1,',',jmax+1, ']=',a[imax,jmax]) end. тестовое решение: n= 10 -275 257 -860 744 -263 843 8 667 425 -547 -392 635 636 -441 -64 973 201 -864 -126 -868 -764 43 -884 -667 -113 807 354 966 -155 -527 532 -790 -911 0 -303 -471 453 431 -741 -582 -121 548 -946 610 724 -426 963 -589 -591 845 -846 629 728 634 -581 681 141 807 -142 -70 -510 42 -177 -48 -80 -601 547 -364 862 -593 -480 770 876 -544 253 -312 -11 -494 -391 -687 843 -56 558 0 -681 903 -519 -545 -418 15 387 646 -427 329 928 837 -274 101 -310 325 27 327 -452 -998 325 -616 752 273 -619 731 -307 -364 199 -454 86 546 483 823 -367 17 917 92 -945 -152 19 -126 198 -453 -473 416 961 888 815 283 286 -483 -604 557 674 935 -849 207 -926 -149 -677 -248 -552 -972 -756 -617 -646 -97 -532 673 407 934 272 700 -18 -548 186 206 -253 -35 769 -196 -179 915 259 -431 151 926 -851 -302 -134 -289 19 204 -474 -732 максимум по модулю а[11,4]=-998
Популярно: Информатика
-
Elkhadi54Skorpion28.10.2020 13:36
-
Dasha164893819024.02.2021 09:17
-
ткач212.12.2022 09:31
-
igor228503.10.2022 13:33
-
Ленка607.05.2021 22:38
-
2yva29309.04.2022 01:32
-
Seks738314.05.2021 13:59
-
Lyn802324.01.2021 08:35
-
svetagrigorenko28.04.2023 05:31
-
TTLoXoIMalchik16.01.2023 20:13