Ответ:
3
Объяснение:
9 команд веред ровно 36 единиц
3 команды назад ровно -9единиц
36-9=27
поэтому команд ,,назад 3" должно быть 3
FOR15
program fofgogjoj;
var
n,i : integer;
a,p : real;
begin
Writeln('Введите число.');
Readln(a);
Writeln('Введите степень');
Readln(n);
p:=1;
for i:=1 to n do
begin
p:=p*a;
end;
if a<0 then
p:=1/p;
Writeln(p :6:3);
readln;
<span>end.
FOR16
</span><span>program fofgogjoj;
var
<span>i, n: integer;</span>
<span>a, p: real;
</span></span><span>begin
<span>Writeln('Введите число:');</span>
<span>Write(' a = ');</span>
Readln(a);
<span>Writeln('Введите показатель степени (n > 0):');</span>
<span>Write(' N = ');</span>
Readln(N);
<span>Writeln('Все степени числа ', a, ' от 1 до ', n, ':');</span>
<span>p:= 1;</span>
<span>for i:=1 to n do</span>
begin
<span>p:= p*a;</span>
<span>Writeln(' ', a, ' в степени ', i, ': ', p:0:2)
</span><span>end</span>
<span>end.</span></span>
ВОТ,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,
var
x: <em>real </em>:= 1;
begin
while (x <= 13) do
begin
writeln('y(', x, ') = ', ln(cos(x)));
x += 0.4;
end;
<span>end.</span>
Открываем виндовый калькулятор, выбираем режим "программирование"
1) 49_10 вбиваем в калькулятор и нажимаем равно
HEX это 16 ричные = 2А
OCT это 8 ричные = 52
BIN это двоичные = 00101010
2)109 (не забыть выбрать режим DEC - десятичные числа) = 1101101 BIN 7 единичек
3) переключаем в двоичный режим, вбиваем перво число, плюс, второе число, равно 00100100
4)переключаем в двоичный режим, вбиваем перво число, минус, второе число, равно 1010
5)переключаем в двоичный режим, вбиваем перво число, умножить, второе число, равно 10010001
6) вбиваем 45 в десятичном режиме и переключаем режимы пока не встретим число 55, это оказывается восьмиричный режим, значит х=8