Каждая планета Солнечной системы вращается вокруг своей оси
Всякий человек способен мыслить
var
x: real;
begin
readln(x);
if x < 2 then write(x * x + 4 * x + 5);
if x = 2 then write(1 / (x * x + 4 * x + 5));
if x > 2 then write(1);
end.
Const
m = 10;
var
a: array[1..m] of integer;
i,j, min: integer;
begin
write ('Исходный массив: ');
for i := 1 to m do
begin
a[i] := random(100);
if (i=1) or (a[i]<min) then min:=a[i];
write (a[i],'; ');
end;
writeln;
for i:=1 to m do
begin
if a[i]=min then
begin
for j:=i to m-1 do
a[j]:=a[j+1];
break;
end;
end;
a[m]:=0;
write('Измененный массив: ');
for i := 1 to m-1 do
write (a[i],'; ');
<span>end.</span>
Новгород, петроград,Ленинград,Белгород, Вышеград, Кировоград,Царьград, Павлоград
<span>Разбиваешь данное число на тетрады 011 010 111. Каждую тетраду заменяем двоичным числом, получаем ответ 327
</span><span>калькулятор в инженерном режиме встренный в виндовс тебе поможет :)</span>