Когда он сам исполняет свой собственный алгоритм
Написано на Pascal
var a:real;i,k:integer;
begin
writeln('Введите 3 числа');
for i:=1 to 3 do
begin
read(a);
if (a>=2.5) and (a<=5.2) then begin
writeln('Число ',a,' входит в интервал');
k:=k+1;
end;
end;
if k=0 then writeln('Таких чисел нет');
end.<span>
</span>
74 в двоичной будет <span>1001010
91 в двоичной будет </span><span>1011011
Для того чтобы понять как это вышло, попробуйте любое из чисел делить постоянно на 2
Если требовалось вычесть 74-91, то вышло бы -17, что в двоичной системе выглядит как: </span><span>-10001</span>
1)
//PascalABC.NET v3.3 1633
begin
for var i:=3 to 10 do
writeln(i+'^3 = '+Power(i, 3));
end.
2)
//PascalABC.NET v3.3 1633
begin
for var i:=12 to 25 do
if (i mod 6 = 2) or (i mod 6 = 5) then
writeln(i);
end.