<span>Число в шестнадцатиричной системе = 0xB11924E1
</span><span>Число в десятичной системе = </span>2971215073
Под локальным максимумом, скорее всего, имеется в виду число, большее
чем оба его соседа, за исключением случая, когда соседом справа является
0. В таком случае достаточно однократно пройтись по всем числам, запоминая минимальное из расстояний между новым и предыдущим обнаруженными максимумами.
Программа (язык Pascal ABC.Net)
var i1,i2,i3:integer;
i:integer;
curr,minr,lastmax:integer;
begin
readln(i1,i2);
i:=2;
minr:=1000000;
repeat
readln(i3);
if (i2>i1) and (i2>i3) and (i3<>0) then begin
curr:=i-lastmax;
if curr<minr then minr:=curr;
lastmax:=i;
end;
i1:=i2;
i2:=i3;
i+=1;
until i2=0;
if minr=1000000 then writeln(0) else writeln(minr); {стоило бы добавить булевую переменную в качестве флага - был ли хоть один max, но вряд ли расстояние между ними превысит миллион :-}
end.
Магнитная запись была изобретена в начале XX века вроде бы в 1887 году
Using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;
namespace ConsoleApplication1{
class Program {
static void Main(string[] args) {
System.Console.WriteLine("Введите число");
int x = Int32.Parse(System.Console.ReadLine());
int p = 1;
int N = 1;
if (x == 1) {
System.Console.WriteLine("число {0} является фактриалом числа 0", x); }
while (p < x) {
N = N + 1;
p = p * N; <span>
</span> }
if (p == x) {
System.Console.WriteLine("число {0} является фактриалом числа {1}", x, N);
} else {
System.Console.WriteLine("число {0} не является фактриалом числа", x); }
System.Console.Read();
}
}
}