begin
var a := ArrRandom(10, 1, 10); a.Println;
for var i := 0 to a.High do
if i.isOdd then a[i] *= 2
else a[i] *= 3;
a.Println;
end.
Составим план:
1История создания
2использование человеком
3Внешнее стоение
4 Внутреннее строение
Ну и т.д.
Здесь очень просто: телевидение и интернет ( можно добавить телефон)
Как сделать - что? перевести в двоичную сис-му счисления, или куда-то в другую?
46А (16)=1001010 (2)=112(8)
155(8)=6D (16)=1101101(2)
Вроде так, но без конкретных примеров сложно проверить