1) Как представлено число 8310 в двоичной системе счисления? В этом вопросе нет ни одного числа двоичного кода. В двоичном коде будет: 10000001110110 2) Дано: , . Какое из чисел С, записанных в двоичной системе счисления, удовлетворяет неравенству ? Я думаю, что вопрос звучал так: Дано: a=222 8 , b=94 Какое из чисел С, записанных в двоичной системе счисления, удовлетворяет неравенству?ответ:2) С = 250(8сч) удоволетворяет неравенству а=247 меньше С=250 и b= 251 больше С=250. 3) Даны 4 целых числа, записанные в двоичной системе... ответ: все четыре числа меньше чем 396 4) Укажите через запятую в порядке возрастания все основания систем счисления, в которых запись числа 39 оканчивается на 3. ответ: 4, 6, 9, 12, 18, 36 5) Запись числа 30 в некоторой системе счисления выглядит так: 110N. Найдите основание системы счисления N. 6) Решить уравнение: где???????????????? 7) Сколько единиц в двоичной записи числа 42016 + 22018 – 6? Я не смог решить 8) Значение арифметического выражения: 274 – 95 + 38 – 25 записали в системе счисления с основанием 3. Сколько цифр «2» содержится в этой записи? Я не смог решить
// PascalABC.NET 3.1, сборка 1230 от 27.04.2016 unit MatInt;
interface
type Matrix=array[,] of integer;
function MatCreate(m,n:integer):Matrix; procedure MatPrint(a:Matrix;w:integer); procedure MatMax(a:Matrix;var x,imax,jmax:integer);
implementation
function MatCreate(m,n:integer):Matrix; // создает матрицу и инициализирует её нулями begin SetLength(Result,m,n); end;
procedure MatPrint(a:Matrix;w:integer); // выводит матрицу, отводя w позиций под элемент begin var n:=Length(a,1)-1; for var i:=0 to Length(a,0)-1 do begin for var j:=0 to n do Write(a[i,j]:w); Writeln end end;
procedure MatMax(a:Matrix;var x,imax,jmax:integer); // возвращает значение максимального элемента и его координаты begin imax:=0; jmax:=0; var n:=Length(a,1)-1; for var i:=0 to Length(a,0)-1 do for var j:=0 to n do if a[i,j]>a[imax,jmax] then (imax,jmax):=(i,j); Inc(imax); Inc(jmax); x:=a[imax-1,jmax-1] end;
// PascalABC.NET 3.1, сборка 1230 от 27.04.2016 uses MatInt; begin var a:=MatCreate(5,8); var n:=Length(a,1)-1; for var i:=0 to Length(a,0)-1 do for var j:=0 to n do a[i,j]:=Random(-50,50); MatPrint(a,4); var irow,jcol,max:integer; MatMax(a,max,irow,jcol); Writeln('Максимальный А[',irow,',',jcol,']=',max) end.
import random
x = int(input('Введите число (x): '))
a = [int(random.randint(1, 100)) for _ in range(100)]
amount = 0
for num in a:
if num == x:
amount += 1
print(a)
print('Число', x, 'встречается', amount, '(раз)')