Program chisla;
uses crt;
var a,b,c : integer;
begin
Readln(a);
b:=a+5;
c:=a*10;
writeln(b);
writeln(c);
end.
For i in range(100,1000):
i1 = i // 100
i2 = i // 10 % 10
i3 = i % 10
if (i % 11 == 0) and (i1==3 or i2==3 or i3 == 3):
print(i)
Результат:
132
143
231
253
308
319
330
341
352
363
374
385
396
473
539
583
638
693
737
803
836
913
935
Для начала , найдем i(вес 1 символа) по формуле N=2^i N(Мощность алфавита) 32=2^5 ; значит i=5 бит, а как нашел то что 5, я просто 2×2×2×2×2=32 кол.двоек означает вес 1 символа.
Теперь, чтобы найти I(Обьем текста )=(кол.страниц×кол.строк×кол.символов×вес 1 символа)
I=10×60×70×5=210'000 бит .
210'000÷8=26'250байт=26'250÷1024=25.63кбайт(килобайт)
Ответ:25.63кбайт обьём текста
P.S: Знак (') я писал, чтобы легче было распознать число.
Var s,i,c:integer;
begin
s:=0;
c:=1;
for i:=1 to 16 do begin
s+=c;
c*=2;
end;
writeln(s);
<span>end.</span>