Уровень в Заполни таблицу в тетрали. Како у Вам относится Приведи Провер Информация Тестовая информация - это информация, представленная с использованием специальных Сизолови букв языков разных стран 2 3 Говор L С D N 10 50 100 500 1000 1 1
Ну тут сложно что-либо разжевать, ибо это основа основ.
Если в более доступной форме, то начнем с простого:
1. Бит - минимальная единица размерности, т.е меньше нет.
2. Последующие размерности можно перевести как в биты, так и в другие размерности.
а) 1 байт = 2^3, т.е 1 байт равен 8 битам. В данной букве мы получаем 2^13, потому что в конце цепочки имеем Кбайты (килобайты), а 1 кбайт = 2^10 байт. В итоге получается, что 1 Кбайт = 2^13 бит. Мы просто сложили 2^3 и 2^10.
б) Все тоже самое, только в данном случае у нас Мбайты (мегабайты), т.е 2^10 кбайт. Сложив все степени мы видим, что 1 Мбайт = 2^23 бит (2^10 * 2^10 * 2^3)
// 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.
Ну тут сложно что-либо разжевать, ибо это основа основ.
Если в более доступной форме, то начнем с простого:
1. Бит - минимальная единица размерности, т.е меньше нет.
2. Последующие размерности можно перевести как в биты, так и в другие размерности.
а) 1 байт = 2^3, т.е 1 байт равен 8 битам. В данной букве мы получаем 2^13, потому что в конце цепочки имеем Кбайты (килобайты), а 1 кбайт = 2^10 байт. В итоге получается, что 1 Кбайт = 2^13 бит. Мы просто сложили 2^3 и 2^10.
б) Все тоже самое, только в данном случае у нас Мбайты (мегабайты), т.е 2^10 кбайт. Сложив все степени мы видим, что 1 Мбайт = 2^23 бит (2^10 * 2^10 * 2^3)
в) Делается так же по аналогии с предыдущими.