Program qqq;
var n, s, x1, z1, i, del: integer;
begin
writeln ('vvedi 5-znachnoe chislo < 32768');
{ограничение типа integer}
readln (n);
del:=10000;
for i:=1 to 5 do
begin
z1:= n mod del;
x1:= n div del;
s:=s+x1;
n:=z1;
del:=del div 10;
end;
writeln ('summa cifr=', s);
readln;
end.
1.
var
a:array [1..100000] of integer;
n, k, i:integer;
begin
read (n);
for i:=1 to n do
read (a[i]);
for i:=1 to n do
writeln (a[i]);
readln (k);
for i:=1 to n do
if k>a[i] then write (a[i]);
end.
Это эмулятор некой платформы,аля windows or linux
для которой нужен дистрибутив
Для начала надо найти i(вес 1 символа, т.е чему равен 1 символ в битах)
Для этого есть формула N=2^i ; N(Мощность алфавита)
Подставляем в формулу мощность алфавита.
64=2^6 значит i=6 бит, а как получил 6 тут просто нужно , 2×2×2×2×2×2=64, кол.двоек означает вес 1 символа.
Теперь, чтобы найти I(3 страниц)нужно (кол.страниц×кол.строк×кол.символов×вес 1 символа)
I=3×40×60×6=43'200 бит, теперь переведем в байты по условию задачи.
43'200 бит=43'200÷8=5'400байт
Ответ:5'400 байт<span> количество информации содержат 3 страницы.</span>