Ну например:
7+8=15
(Ну ведь больше 10)
Program z_1;
var i,n,fact:longint;
begin
writeln('введите число от 1 до 10);
read(n);
fact:=1;
if (n>=1) and (n<=10) then
for i:=1 ti n do
fact:=fact*i
else
write('число не входить в диапозон от 1 до 10');
end.
check comment ( pls delete )
Объяснение:
в 128 символьном алфавите 1 символ равен 7 битам
1120/6= 160
В Лего можно фантазировать бесконечно,очень много деталей и они разных цветов,похоже на реальную жизнь.