uses Crt;
const n=10;
Type Mas=array [1..n] of integer;
var P, M: Mas;
i: integer;
begin
ClrScr;
for i:=1 to n do
P[i]:=10+random(20);
for i:= 1 to n do
Write (P[i]:4);
WriteLn; WriteLn;
for i:=1 to n do
if (i mod 2 = 0) then M[i]:=i*P[i] else M[i]:=-1*P[i];
for i:=1 to n do
Write (M[i]:4);
ReadLn;
end.
Если я правильно рассуждаю,то получается так - 24 = 2 ^I
I=5
5*200 = 1000 \8= 125 байт
Вся информация на компьютере представлена в двоичном коде, т.е. последовательностью нулей и единиц - для каждой буквы своя последовательность, все последовательности в одном алфавите равны по длине. Из этого следует, что чем больше длинна последовательности в алфавите, тем больше их можно составить. Например, последовательностей в 2 бита можно составить 4: 00 01 10 11.
В 3 - уже 8: 000 001 010 011 100 101 110 111 - всего 8 символов(возможных последовательностей, или же - мощность алфавита) и на каждый символ уходит 3 бита - вес символа.
1. Каждый бит уменьшает неопределённость в 2 раза. 2 бита - значит, неопределённость уменьшилась в 2*2=4 раза, т.е. всего 4 цвета
2. 16 цветов (аналогично п. 1) - значит, каждый пиксель кодируется 4 битами. 640*250*4 бит=80000 байт=78,125 кбайт
3. 4 цвета - 2 бита, 256 цветов - 8 бит на каждый пиксель (т.к. 2^8=256), т.е. размер должен уменьшиться в 4 раза (в 2 раза по верт. и 2 по горизонтали), т.е. размеры 150х100
в году 365 дней ,а у нас 740учеников 740/365=2 и остаток 10 тоесть у нас уже каждый день празднуют по 2 ученика и еще 10учеников ну дней свободных нет тоесть будет как минимум 10 дней и 3 др
