//PascalABC.Net 3.1.0.1200
var
yesterday, before_yesterday, all, this_day, days: integer;
begin
yesterday := 6;
before_yesterday := 6;
all := yesterday + before_yesterday;
days := 2;
repeat
days += 1;
this_day := yesterday + before_yesterday + 3;
all += this_day;
if days mod 10 = 0 then all := trunc(all * 0.95);
before_yesterday := yesterday;
yesterday := this_day;
until all > 1500;
writeln('days = ', days);
end.
Перевод из 10-ой с/с в 2-ую
1)-73₁₀ = -1001001₂
2)-11₁₀ = -1011₂
3)-97₁₀ = 1100001₂
4) 43₀ = 101011₂
5) 83₁₀ = 1010011₂
6) 15₁₀<span> = 1111</span>₂
Скорость передачи
2500 / 40
время передачи нового файла
2750 / (2500/40) = 1,1*40 = 44 сек
Ответ 44 сек
Program pask;
var
a,b,sum: integer;
begin
sum:=0;read(a,b); //ввод интервала [a;b]
write('Сумма нечетных чисел из интервала [',a,';',b,'] = ');
while a<=b dobegin if a mod 2 = 1 then sum:=sum+a; a:=a+1;end;
write(sum);
end.
Разьем для микропроцессора
разъемы шин PCI, PCI-Express
<span>разъемы под оперативную память
</span>BIOS
батарейка
разъемы под жесткий диск с интерфейсом SATA
южный и северный мост (и их радиаторы)
конденсаторы обычные и твердотельные (один дутый)
слева выглядывает чип питания
чип звуковой карты в окружении сопротивлений и диодов
какая-то перемычка (толком не разглядеть)
катушки индуктивности
разъем для питания вентилятора
разъемы для подключения блока питания
несколько диодных мостов
какие-то микросхемы (невидно нужна лупа)
и сам многослойный текстолит на котором этот металлолом держится