Var a,b,c:real;
begin
writeln('Введите a,b,c');
readln(a,b,c);
if (a<=3) and (a>=-1) then writeln(a, ' принадлежит промежутку [-1,3]');
if (b<=3) and (b>=-1) then writeln(b, ' принадлежит промежутку [-1,3]');
if (c<=3) and (c>=-1) then writeln(c, ' принадлежит промежутку [-1,3]');
end.
Если я не ошибаюсь конечно,то это величина.величина бывает как постоянная(константа) так и пенеменная постоянная величина не изменяет своего значения в ходе выполнения алгоритма,а переменная может изменять свое значение в ходе выполнения алгоритма)в общем можно многое писать об этом,я предполагаю что это величина
Формула для вычисления количества информации: . Вычислим объем информации в письме племени Мульти. К = 17, так как используется 17-символьный алфавит. N = 100, так как в письме 100 символов. Получается Тогда, раз , то I = 500 бит.
Вычислим объем информации в пиьме племени Пульти. бит. Значит, в письме племени Мульти содержится в два раза больше информации.
Var a,b,c,y1,y2,d,i:real;
begin
read(a,b,c);
d:=b*b-4*a*c;
if d>0 then
begin
y1:=(-1*b+sqrt(d))/(2*a);
y2:=(-1*b-sqrt(d))/(2*a);
if y1>=0 then
begin
writeln(sqrt(y1));
writeln(sqrt(y1)*-1);
end;
if y2>=0 then begin
writeln(sqrt(y2));
writeln(sqrt(y2)*-1);
end;
end else
if d=0 then
begin
y1:=(-1*b)/(2*a);
if y1>=0 then begin
writeln(sqrt(y1));
writeln(sqrt(y1)*-1);
end;
end
else
writeln('Корней нет');
<span>end.</span>
№1
а) 101011111<span> + </span>111101<span> = </span>110011<span>100
б) </span>101011111 - 111101 = 100100010
в) 101011111<span> × 1</span>001<span> = </span>110001010<span>111
</span>№2
927 (10)<span> = 1</span>021100 (3) = 12202 (5) = 2463 (7) = 1<span>240 (9)
</span>№3
AC6 (16) - 432 (6) + 723 (9) - 444 (5) = AC6 (16) - A4 (16) + 24C (16) - 7C (16) = <span>BF2 (16)</span>