Компьютеh - это компьютер. Наверно кто-то быстро писал и ошибся нечаянно.
Cначало умножаем a с х и 2 a*x*2 -> 5*(-5)*2=-50
затем умножаем b на x b*x -> 9*(-5)=-45
и плюсуем все -50+(-45)+12=-95+12=-83
Var A,i,k:integer;
Begin
Write('Введите 10 целых чисел: ');
k:=0;
For i:= 1 to 10 do
Begin
Read(A);
if A>0 then k:=k+1
End;
Write('Количество положительных: ',k);
End.
Переведем Кбиты/с в кБ/с (килобайты в секунду, далее просто кБ/с), для этого разделим скорость на 8.
800 Кбит/с : 8 = 100 кБ/с.
Далее 160 Мб переведем в кБ, 160 * 1024 = 163840 кБ.
Рассчитаем время, для этого 163840 кБ : 100 кБ/с = 1638,4 секунд. Переведем в минуты, если нужно: 27 минут - приблизительно.
<em>Ответ приблизительный: 27 минут или 1638,4 секунд</em>
1.
b=9%5=4
b=b*10=4*10=40
a=b//5-3=40/8-3=5-3=2
2.
b=a//10=167//10=16
b=b/4+2=16/4+2=4+2=6
a=b*25+2=25*6+2=150+2=152
a=a+b=152+6=158
3.
b=a//100+a%100=841//100+841%100=8+41=49
a=a//10=841//10=84
a=a%10=84%10=4
a=a+b=4+49=53
4.
a=a//b=344//8=172//4=86//2=43
b=a%b=43%8=3
5.
b=a+b=20+18=38
a=b-a=38-20=18
b=b+a=18+38=56
<u><em>Полезная инфа.</em></u>
<em>// - </em><em>деление нацело.</em>
<em>% - остаток от деления нацело.</em>
<em>**-возведение в степень.</em>
<em>*,-,+,/ - обычные арифметические действия.</em>