2. 3. 8. Потому что например: boo?.TMP tmp это расширение без него никак
<em>// PascalABC.NET 3.2, сборка 1417 от 28.03.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
type
Mas=array[,] of integer;
procedure GetMas(s:string; var a:Mas);
begin
Writeln('*** Массив ',s,' ***');
var n:=ReadInteger('Количество строк в массиве:');
var m:=ReadInteger('Количество столбцов в массиве:');
Writeln('Вводите элементы массива');
a:=ReadMatrInteger(n,m)
end;
function SumDiag(a:Mas):integer;
begin
Result:=0;
for var i:=0 to Min(a.RowCount,a.ColCount)-1 do Result+=a[i,i]
end;
begin
var a,b,c:Mas;
GetMas('A',a);
GetMas('B',b);
GetMas('C',c);
Writeln('Общая сумма элементов главных диагоналей равна ',
SumDiag(a)+SumDiag(b)+SumDiag(c))
end.
<u>Пример</u>
*** Массив A ***
Количество строк в массиве: 3
Количество столбцов в массиве: 4
Вводите элементы массива
-33 -50 34 -41
-31 10 37 31
32 -49 -32 -27
*** Массив B ***
Количество строк в массиве: 2
Количество столбцов в массиве: 2
Вводите элементы массива
-22 35
0 11
*** Массив C ***
Количество строк в массиве: 3
Количество столбцов в массиве: 2
Вводите элементы массива
23 38
17 -8
16 -1
Общая сумма элементов главных диагоналей равна -51
Основное назначение этой папки заключается в быстром обмене файлами и папками между учетными записями пользователей на одном компьютере или с другими компьютерами и устройствами в сети.Использовать эту папку или нет – личный выбор каждого. Мне она не нужна, но это не означает, что она не пригодиться и вам. Например, если ваш компьютер используют другие члены семьи, и у каждого из них есть своя учетная запись, вы можете использовать папку «Общие» для обмена файлами между всеми этими пользовательскими учетными записями. Все, что вы поместите в эту папку, станет доступно из-под других учетных записей. Каждый может внести изменения в любой файл, и как только изменения будут сохранены, они станут доступны остальным пользователям.<span>Папку «Общие» можно использовать для обмена файлами с другими компьютерами в вашей сети. Это может быть особенно полезно при совместном использовании файлов с пользователями, на компьютерах которых установлена операционная </span>
Переведём число в 2 СС. нацело оно не переведется, поэтому переводим до стольки знаков после запятой, чтобы их общее кол-во вместе с целой частью было =24;
24,29 в 10 СС= 11000,0100101000111101011 в 2 СС
р=5
Мр=1000101
0100|0101|1100|0010|0101|0001|1110|1011
4 5 C 2 5 1 E B
Ответ:45С21ЕВ
Буду обозначать команду "умножение на 2" буквой m, "стереть последнюю цифру" буквой c.
а) 361 -> 722 -> 72 -> 7 (mcc)
361 -> 36 -> 72 -> 7 (cmc)
б) 457 -> 45 -> 90 -> 9 -> 18 -> 36 -> 72 -> 7 -> 14 (cmcmmmcm)
457 -> 914 -> 1828 -> 3656 -> 7312 -> 14624 -> 1462 -> 146 -> 14 (mmmmmccc)