// процедура обмена значений переменных а и b
procedure swapp(var a,b:integer);
var c: integer;
begin
c:=a;
a:=b;
b:=c;
end;
// основная программа
var a,b,c: integer;
begin
write('числа a b c через пробел: ');
readln(a,b,c);
if a>b then swapp(a,b);
if b>c then swapp(b,c);
writeln('среднее по значению: ',b);
end.
Ввод -вывод:
числа a b c через пробел: 25 14 18
среднее по значению: 18
<span>а) 111000111 (2) = 455 (10)
б) </span><span>100011011 (2) = 283 (10)
в) </span><span>1001100101 (2) = 613 (10) и 1001 (2) = 9 (10)
г) </span><span>1001001 (2) = 73 (10) и 11 (2) = 3 (10)</span>
В двоичной системе счисления дробного числа быть не может
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>
Общая формула ног K=2*L+4*M (У куриц две ноги, у кроликов 4). Общее число животных N=L+M,где L-число куриц, М-число кроликов. Из этого следует, что L=N-M. Теперь подставляем в первую формулу: K=2*(N-M)+4*M,
K=2*N-2*M+4*M, K=2*N+2*M, K-2*N=2*M, M=(K-2*N)/2. Формула для нахождения числа кроликов готов. А для куриц будет проще L=N-M.
И все