K:=0
sum:=0
for i:=1 to 10 do
begin
if m[i]<0 then
begin
k:=k+1;
sum:=sum+m[i];
end;
end;
writeln(sum/k);
end.
Var
A,Sp,So:real;
i:integer;
Begin
Sp:=0;
So:=0;
For i:= 1 to 10 do
Begin
Read(A);
if A<0 then So:=So+A
else Sp:=Sp+A;
End;
WriteLn('Сумма отрицательных: ',So);
WriteLn('Сумма положительных: ',Sp);
End.
1):<span>С:\Учебный\Информатика\Кодирование ->
</span><span>С:\Учебный\Информатика ->
</span><span>С:\Учебный ->
</span><span>С:\Учебный\Информатика ->
</span><span>С:\Учебный\Информатика\Кодирование ->
</span>С:\Учебный\Информатика ->
С:\Учебный ->
Не подходит, т.к. Витя опустился на n уровней, а поднялся на n+2, что не подходит по условию.
2)С:\Учебный\Информатика\Кодирование ->
<span> С:\Учебный\Информатика ->
</span><span>С:\Учебный ->
</span> С:\Учебный\Информатика ->
<span> С:\Учебный\Информатика\Программирование->
</span><span>С:\Учебный\Информатика\Программирование\Паскаль
</span>Не подходит, т.к. Витя спустился на либо на 2 уровня вниз, либо на 3, а поднялся либо на 3, либо на 4 уровня вверх, что не подходит по условию.
3)<span>С:\Учебный\Информатика\Кодирование ->
</span>С:\Учебный\Информатика ->
С:\Учебный ->
<span> С:\Учебный\Математика ->
</span><span> С:\Учебный\Математика\Дроби
Подходит. </span>Витя опустился на 2 уровня вниз и поднялся на 2 уровня вверх.
4)С:\Учебный\Информатика\Кодирование ->
<span> С:\Учебный\Информатика ->
</span><span>С:\Учебный ->
</span><span>С:\ ->
</span><span>С:\Учебный\ ->
</span><span>С:\Учебный\Информатика
</span>Не подходит, т.к. Витя спустился на 3 уровня вниз, а поднялся на 2, что не подходит по условию.
Ответ: 3)
1)1111101,011(2)=1*2^6+1*2^5+1*2^4+1*2^3+1*2^2+0*2^1+1*2^0+0*2^ -1+1*2^-2+1*2^-3=64+32+16+8+4+0+0,25+0,125=135,375(10)
2)100001,2=1*2^5+0*2^4+0*2^3+0*2^2+0*2^1+1*2^1+1*2^-1=32+0+0+0+0+1+0.5=33,5(10)
3)1011011,111=1*2^6+0*2^5+1*2^4+1*2^3+0*2^2+1*2^1+1*2^0+1*2^-1+1*2^-2+1*2^-3=64+0+16+8+0+2+1+0,5+0,25+0,125=91,875(10)
Если это среда разработки то нужно объявить переменные X и Y
далее написать схему выполнения данной задачи