Var
a,b,c,d:integer;
begin
writeln('Введите трехзначное число: ');readln(a);
b:= a div 100;
c:= a mod 100 div 10;
d:= a mod 10;
if (b mod 2 = 0)and(c mod 2 = 0)and(d mod 2 = 0)
then writeln('yes')
else writeln('no');
end.
Program n1;
var n,i,k: integer;
sum,a: real;
begin
sum:=0;
k:=0;
write('n=');
readln(n);
for i:=1 to n do
begin
readln(a);
if a<0 then begin
sum:=sum+a;
k:=k+1;
end;
end;
writeln(sum/k);
end.
32=2^6 => Для русского языка 1 символ несет 6 бит инфы.
26=2^i => i = log 26 по основанию 2 = 4,7 бит => Для фр. языка 1 символ несет 4,7 бит инфы.
V информации = 10 * 6 бит = 60 бит (для русского языка)
V информации = 10 * 4,7 бит = 47 бит (для фр. языка)
Значит для русского языка сообщение из 10 знаков несет больше информации.
a*b*i=I
N=2^i
Где a*b-размер изображения, N-количество цветов,i-количество памяти на один пиксел, I-Вес рисунка(бит)
1)64*64*i=512*8
i=1
N=2
Ответ:2
2)256=2^i
i=8
a*b*8=2400*8
a*b=2400
Ответ:2400
3)N1=4=2^2
I1=64*128*2=2^14бит=2кбайт
N2=16=2^4
I1=32*32*4=2^12бит=0,5кбайт
Ответ:на первое изображение потребуется в 4 раза больше места