coalajk
?>

Сообщение , если с его можно решить необходимые вам задачи. (Варианты ответа) 1) полно. 2)полезно. 3)актуально. 4)достоверно. 5)объективно. 6)понятно.

Информатика

Ответы

SVETLANAluiza1534

PascalABC.NET 3.5.1 + .NET Framework 4.7.1

#1

begin

 var n := ReadInteger();

 var a := Range(1, n);

 //Sum

 a.Sum.Println;

 //произведение

 a.Aggregate(BigInteger.One, (p, q) -> p * q).Println;

 //Кол-во кратных 2 и 3

 a.Where(p -> (p mod 2 = 0) and (p mod 3 = 0)).Count.Println;

 //Среднее ряда

 a.Average.Round.Println

end.

#2

begin

 var A := ReadArrInteger(10);

 A.Println;

 //максимум

 A.Max.Println;

 //Сумма кратных 2 и 3

 A.Where(p -> (p mod 2 = 0) and (p mod 3 = 0)).Sum.Println

end.

nalich8524
Для перевода из двоичной в шестнадцатеричный надо код разделить на тетрады (на группы по 4 цифры):
0101 1101 1000 1010 1010 1111 0010 1010
Если слева недостаточно цифр до тетрады, то слева добавляем нули.
Далее переводим тетрады в шестнадцатеричный код с таблицы:
0000 => 0        0001 => 1        0010 => 2        0011 => 3        0100 => 4
0101 => 5        0110 => 6        0111 => 7        1000 => 8        1001 => 9
1010 => A       1011 => B        1100 => C       1101 => D        1110 => E
1111 => F
0101 1101 1000 1010 1010 1111 0010 1010 = 5D8AAF2A

Для перевода в восьмеричный код делаем аналогично, только на двоичный код делим на группы по 3 цифры:
001 011 101 100 010 101 010 111 100 101 010
И также если не хватает до 3-ех цифр, то слева добавляем нули.
Затем переводим по аналогичной таблице:
000 => 0      001 => 1      010 => 2      011 => 3
100 => 4      101 => 5      110 => 6      111 => 7
001 011 101 100 010 101 010 111 100 101 010 = 13542527452

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Сообщение , если с его можно решить необходимые вам задачи. (Варианты ответа) 1) полно. 2)полезно. 3)актуально. 4)достоверно. 5)объективно. 6)понятно.
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

silicon-films3375
nailya-abdulova25
donliolik
tsarkovim
kryshtall2276
Дмитрий_Евлампиев518
Columbia777
Мария-Кострыгина175
katekn6032
ЕВ1873
ulyana-d
dnikolay365
kotsur
Павел_Перелыгин
GridnevaVNIGNI"