Я думаю, что да. Зная сюжет сказки, они не обошлись без Мышки.
Var a,b,c,d,e:integer;
begin
for a:=100 to 500 do begin
b:=a mod 2; c:=a div 10 mod 10; d:=a div 100;
e:=b+c;
if e=15 then writeln(a);
end;
end.
Попробуй сделать про то как две девочки попали в волшебную страну и так далее
var n,s:integer;
x1,x2,x3,x4:integer;
begin
write('Vvedite N = ');
read(n);
x1:=n div 1000;
x2:=n mod 1000 div 100;
x3:=n mod 100 div 10;
x4:=n mod 10 div 1;
s:=x1+x2+x3+x4;
writeln(s);
end.
Дано:
N=64
Длина = 10 символов;
Решение:
найдем вес одного символа по формуле
2^i=N
2^i=64
i=6 бит (на один сивол)
6*10=60 бит
Ответ:60 бит