Var a,n,p,i:integer;
begin
write('Введите а и n: ');
readln(a,n);
p:=a;
for i:=1 to n-1 do
p:=p*(a+i);
writeln('Ответ: ',p);
<span>end.
var a,n,p,i:integer;
begin
write('Введите а и n: ');
readln(a,n);
p:=a;
while i<n-1 do
begin
i:=i+1;
p:=p*(a+i);
end;
writeln('Ответ: ',p);
<span>end.</span></span>
Сначала умножаем первую скобку на вторую, третью оставляем без изменений.
(А/\!А+!А/\!В+А/\!В+!В/\!В)/\(!А+С)=(0+!А/\!В+А/\!В+!В)/\(!А+С)
в первых скобках вынесем !В за скобки, получаем: (!В/\(!А+А+1))/\(!А+С)
!А+А+1=1, значит у нас остается !В/\(!А+С)
В любых
случаях и условиях
Объяснение:
Локальная сеть выполняет следующие функции:
1) совместное использование данных;
2) обмен данными, например, электронную почту — отправку сообщений в сети указанным адресатам. Электронная почта изначально появилась в локальных сетях; с развитием глобальных сетей глобальная электронная почта заняла лидирующее положение;
3) совместное использование программ;
4) совместное использование модемов, принтеров и других устройств.
запишем условие: i=4бит, N=?
решение: общее количество равновероятностных событий посчитаем по формуле N=2^i, N=2^4, N=16 это и есть ответ