<span>Рентгеновские лучи
</span><span>Телевидение
</span>
<span>Мобильный телефон
</span>
Компьютер
Интернет
Электромобиль
Игровые приставки
Самолёт и автопилот
{PascalABC}
Program Alexs5655;
var
x1,x2,x,sum: real;
i,n:integer;
begin
var s:='**** -=Alphaeus=- ****'; var k:=0;
for k:=1 to 22 do begin write(s[k]); sleep(47) end;
writeln; write('Введите N = '); readln(n);
x1:=2; x2:=1; sum:=x1+x2; i:=3;
case n of
1: sum:=x1;
2: sum:=x1+x2;
else
while i<=n do
begin
x:=0.8*x2+0.15*x1;
sum:=sum+x;
x1:=x2; x2:=x;
inc(i);
end;
end;
{Вывод}
writeln('Сумма последовательности равна ',sum);
end.
(В блок-схеме, видимо, ошибка: при N=1 сумма должна вычисляться по формуле S:=x1, а не S:=x2)
По горизонтали: 1. Файл. 3. Хранения. 5. Оперативная. 7. Фотография. 8. Бумага. 10. Китай. 11. Пергамент.По вертикали: 1. Фонограф. 2. Береста. 4. Долговременная. 6. Информация. 9. Папирус.
Тут все просто.
40/2 остаток 0, 20 / 2 остаток 0, 10 / 2 остаток 0, 5/2 остаток 1, затем 4 / 2 остаток 0, и 2/2 остаток 1
Итого 40 в двоичной = 101000
А 25 по аналогии будет 11001
3*3=9
9*3=27
27-2=25
25-2=23
23*3=69
ответ: 22112