Ответ:
В)
Объяснение:
Для того, чтобы посчитать сумму 2-го числа, нам нужно эти числа преобразовать в 10-ную, потом сложить обычным методом, и полученное число перевести в 10-ную:
<u>1010101^2</u> = 1∙2^6+0∙2^5+1∙2^4+0∙2^3+1∙2^2+0∙2^1+1∙2^0 = 64+0+16+0+4+0+1 = <u>85^10</u>
<u>1010011^2</u> = 1∙2^6+0∙2^5+1∙2^4+0∙2^3+0∙2^2+1∙2^1+1∙2^0 = 64+0+16+0+0+2+1 = <u>83^10 </u>
<u>Общая сумма:</u>
85 + 83 = <u>168</u>
<u>Теперь переводим 168 из 10-ной во 2-ную:</u>
168^10 = <u>10101000^2</u> [во вложении]...
6папок т.к в 1 папке содержится 2-3 бита
<em>Microsoft QBasic 1.0</em>
DIM x AS DOUBLE, a AS DOUBLE, b AS DOUBLE, h AS DOUBLE
CLS
INPUT "a=", a
INPUT "b=", b
INPUT "h=", h
FOR x = a TO b + h / 2 STEP h
IF ABS(x) <= 1 THEN
y = 1 / x * x + 1
ELSE
y = x ^ 3 - 5
END IF
PRINT x, y
NEXT x
<u>Пример</u>
a=0.5
b=6
h=0.25
.5 2
.75 2
1 2
1.25 -3.046875
1.5 -1.625
1.75 .359375
2 3
2.25 6.390625
2.5 10.625
2.75 15.79688
3 22
3.25 29.32813
3.5 37.875
3.75 47.73438
4 59
4.25 71.76563
4.5 86.125
4.75 102.1719
5 120
5.25 139.7031
5.5 161.375
5.75 185.1094
6 211
Program past;
uses crt;
var name: string;
age: float;
begin
clrscr;
readln('Введите ваше имя'; name);
readln('Введите ваш возраст'; age);
writeln;
if age<5 then
writeln (name, ' 5 лет назад вы еще не родились');
else
writeln (name, ' 5 лет назад вам было ', age -5, ' лет');
endif;
readkey;
end.
<em>// PascalABC.NET 3.3, сборка 1555 от 21.10.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
ReadSeqReal('Вводите последовательность',ReadInteger('N=')).Reverse.Println
end.
<u>Пример</u>
N= 10
Вводите последовательность 5 9 3.15 -6.7 0 12 100 35 0.03 1e-20
1E-20 0.03 35 100 12 0 -6.7 3.15 9 5
