1. 252₈=170₁₀;
A8C₁₆=2700₁₀;
2. 315₁₀=100111011₂;
3. 5434₁₀=1232₈;
4. 2470₁₀=51A6₁₆;
5. 110011₂+1010₂=111101₂;
6. 100010₂+101₂=11101₂;
7. 111₂*101=100011₂.
===== PascalABC.NET =====
begin
var a := ArrRandom(12, -2, 15);
Println('Исходный массив');
a.Println;
Println('Отобранные элементы');
a[2:].Println;
Println('После сортировки');
a[2:].Sorted.Println
end.
Ммм, если ты нигде не ошибся, то цикл не выполнится и программа выведет только девятку, которая перед этим самым циклом стоит
Знак доллара перед адресом означает абсолютную адресацию, это значит, что этот адрес изменяться не будет.
В формуле =A2+$A1 абсолютный адрес - $A, он изменяться не будет.
<span> =A2+$A1
</span>
Формула была скопирована из ячейки B2 в ячейки C2 и D2, значит номера строк остаётся прежним (т.к. по вертикали формула не копировалась), а значения строк в ячейках C2 и D2 будут увеличены на 1 и 2 соответственно.
Получается, что в ячейке C2 будет формула
<span> =B2+$A1
</span>А в ячейке D2 формула
=C2+$A1
В ячейке B2 значение формулы равно 30+10=40
В ячейке C2 Значение формулы будет равно 40+10 = 50
D ячейке D2 значение формулы будет равно 50+10 = 60
Var n, f, o: string; a, i: integer;
begin
write('Введите фамилию ');
Readln(f);
write('Введите имя ');
Readln(n);
write('Введите отчество ');
Readln(o);
a := length(n) + length(f) + length(o);
Writeln('Длина имени, фамилии и отчества равна ', a);
Writeln('Инициалы ', f[1], '. ', n[1], '. ', o[1], '. ');
a := 0;
for i := 1 to length(f) do
if f[i] = 'и' then a := a + 1;
Writeln('Количество букв и в фамилии ', a);
<span>end.</span>