Определите, в каком хронологическом порядке появились следующие изобретения: 1. почта 2. радио 3. компьютерные сети 4. wi-fi 5. телевидение 6. телефон 7. телеграф
Сообщение занимает 39 страниц по 27 строк. Значит, следует найти количество строк. 39×27=1053 строки. Нужно найти количество символов, т. е. количество байт в сообщении. В каждой строке по 35 символов: 1053×35=36855 байт в сообщении. Нужно перевести в Килобайты. В 1 Кб 1024 байт, значит 36855÷1024=35 Кб и 1015 байт в остатке. ответ: 36855 байт в сообщении, 35 Килобайт и 1015 байт в сообщении.
Без подробностей: 1) 39×27×35=36855 (символов)- байты в сообщении 2) 36855÷1024=35 (Кб)- Килобайт и 1015 байт в сбщ.
// PascalABC.NET 3.3, сборка 1590 от 03.12.2017 // Внимание! Если программа не работает, обновите версию!
function NewMatrix(c:string):array[,] of real; // формирует случайную матрицу указанного размера begin var (m,n):=ReadInteger2('Число строк и столбцов в матрице '+c+':'); Result:=MatrRandomReal(m,n,-99,999); Result.Transform(t->Round(t)/10) end;
procedure ShowMatrix(c:string;a:array[,] of real); // выводит матрицу на монитор begin Writeln('*** Матрица ',c,' ***'); a.Println(6,1); Writeln(6*a.ColCount*'='); end;
function PartSum(a:array[,] of real):=a.ElementsByRow.TakeWhile(t->t>=0).Sum; // сумма элементов по строкам до первого отрицательного
function GetArray(a:array[,] of real):array of real; // строит искомый одномерный массив begin var b:=new List<real>; var i:=1; while i<=a.ColCount-1 do begin b.Add(a.Col(i).Average); i+=2; end; b.Sort; Result:=b.ToArray end;
begin var a:=NewMatrix('A'); var b:=NewMatrix('B'); ShowMatrix('A',a); var sa:=PartSum(a); Writeln('Частичная сумма равна ',sa); ShowMatrix('B',b); var sb:=PartSum(b); Writeln('Частичная сумма равна ',sb); var c:=GetArray(sa>sb?a:b); // матрица с большей частичной суммой Write('Построенный массив: '); c.Println end.
Пример Число строк и столбцов в матрице A: 4 7 Число строк и столбцов в матрице B: 5 6 *** Матрица A *** 5.5 68.9 30.6 15.6 8.6 58.7 31.1 51.2 11.1 84.2 4.0 68.0 -4.8 32.7 28.8 65.3 6.2 33.3 94.5 81.5 34.9 -6.1 81.0 -8.0 77.7 -2.8 -6.4 81.7
7
6
2
5
3
4
Как-то так) Блин символов мало пишет...