Program mas; var a: array[1..100] of integer; i, n: integer; begin randomize; writeln('введите размерность массива',n); readln(n); for i: =1 to n do a[i]: =random(45)-1; readln; for i: =1 to n do begin if a[i]> 15 then write(' ',a[i]); end; readln; end.
Спасибо
Ответ дал: Гость
1) чтобы перевести из 2-ой системы в 10-ную нужно каждую цифру умножить на основание системы счисления в степени в какой стоит цифра:
2) чтобы перевести число из 10-ой системы в 2-ную нудно делить исходной число на 2 до тех пор пока исходной число не станет меньше 2, остатки от деления записанные в обратном порядке будут результатом
Популярные вопросы