Найдите минимальное основание позиционной системы счисления x, такое, что если число 37x, записанное - id167094420230421 от sbengardt 21.04.2023 16:56

Question

Информатика: Найдите минимальное основание позиционной системы счисления x, такое, что если число 37x, записанное в этой системе счисления, перевести в десятичную систему счисления – итог будет равен результату возведения числа 2 в некоторую целую степень. в ответе укажите целое число.

sbengardt · Accepted Answer

Const n=20; var a:array[1..n]of integer; i,b,k,c,f,g,h:integer; begin for i:=1 to n do a[i]:=Random(70)-20; for i:=1 to n do write(a[i], ); writeln; for i:=1 to n do begin if (a[i] mod 5 = 0) and (a[i] mod 10 0) or (a[i]=50) then begin b:=i; for b:=i to (n-1) do a[i]:=a[i+1]; end; end; for i:=1 to n do write(a[i], ); write( введите к ); read(k); for i:=1 to n do begin if a[i] mod i = 0 then begin c:=i; for i:=n downto c+1 do begin a[i]:=a[i-1]; a[c+1]:=k; end;end;end; for i:=1 to n do write(a[i],...

MOGZ ответил