Var
a,b:integer;
begin
a:=0;
b:=0;
//Вывод через while
while a<>10 do
begin
inc(a);
write(a,' ');
end;
writeln('');
//Вывод через repeat
repeat
begin
inc(b);
write(b,' ');
end;
until b=10;
<span>end.</span>
Обозначения:
A = (x&A≠0)
B= (x&14≠0)
C= (x&75≠0)
----------------------------
1) A→(¬B→C) =1
¬A+(B+C)=1
A=B+C
2) 14 (10cc)=1110 (2cc)
75= (10cc)=100 1011 (2cc)
3) 100 1011 (+ поразрядное логическое сложение)
000 1110
------------
100 1111 = 79 (10cc) ответ 79
a, b = map(int, input().split())
answer = []
for i in range(a, b):
num = str(i)
length = len(num)
sum = 0
for y in num:
sum += int(y)**length
if sum == int(i):
answer.append(str(i))
if len(answer) == 0:
answer.append('-1')
print(' '.join(answer))
K = 140*25 = 3500 символов;
Если принять русский алфавит за 32 символа, то N = 2^i; 32 = 2^5 ; i = 5
I = K*i = 3500*5 = 17500бит = 2.1875байт
<span>1 дискета = 1457664 байт;</span>
<span>1/3 = 485888байт.</span>
<span>140 символов в минуту = 140*5 = 700бит. = 87.5байт</span>
<span>485888/87.5 = 5553минут</span>
<span>З.Ы Не уверена насчет мощности алфавита, если он читает текстовый файл, то бери 1 символ = 1 байт.</span>
Валерия 12.5 мб/с Олеся 11.8 мб/с Полина 12.9 мб/с
3600/12.9=279