В восьмеричной : <span>47
В шестнадцатеричной: 27</span>
Вот, например, что нашла. 1,2,3 - уже не др.русь, но вдруг надо. а 4,5 рисунок история развития плечевой одежды в др.руси!
Написано на 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>
Uses
Math;
...
MyNumber:=RandomRange(Start, Stop);//1 вариант
MyNumber:=Random(Stop)+Start;//2 вариант. Для него не нужен модуль <span>Math;
</span>Start - От
Stop - До