Var N:integer;
r1,r2,r3:byte;
Begin
WriteLn('Введите четырёхзначное число');
ReadLn(N);
r1:=N div 1000;
r2:=(N div 100) mod 10;
r3:=(N div 10) mod 10;
N:=N mod 10;
Write((r1<>r2)and(r1<>r3)and(r1<>N)and(r2<>r3)and(r2<>N)and(r3<>N))
End.
134217728 ^ y бит = <span>8 ^ х бит
65536 ^ x бит = 16777216 ^ y бит
</span><span>
</span>134217728 ^ y бит = 8 ^ х бит
16777216 ^ y бит = 65536 ^ x бит
8 ^ y бит = (1/8192) ^x бит
2 ^ 3y бит = 2 ^ (-13x) бит
x = - (3y / 13), y = - (13x / 3)
Это все ответы для Интернет урока за 8 класс Информатика.
К =640*350
N=512
I-?
Решение :
N=2^i=2^9
I=K*i=512*9=4608 бит
Чтобы перевести в байты нам нужно 4608:8=576
Чтобы перевести в Кбайты нам нужно 576/1024=0,56 Кбайт
ну как то так......
Желаю удачи!