<span><span>Представление информации с помощью некоторого кода</span> - Кодирование
</span>
В зависимости от типа форматирования носителя...А так 0,5 Кбайт.= 512 Байт
(ln(128)/ln(2)) бит на пикс * 15 точек ширина * 15 точек высота = 1575 бит инф. объём (вес фотки).
1)Program n_1;
var x,y,z,c:integer;
begin
readln (x,y,z);
c:=x;
if c>y then c:=y;
if c>z then c:=z;
writeln (c);
end.
2)Program n_2;
var x,y,z:integer; q,w,e:boolean;
begin
readln (x,y,z);
q:= (y>x) and (z>x);
w:= (y<x) and (y<z);
e:= (z<y) and (z<x);
if e=True then writeln (z);
if w=True then writeln (y);
if q=True then writeln (x);
end.
3)Program n_3;
var x,y,z:integer;
begin
readln (x,y,z);
if (x<y) and (x<z) then writeln (x);
if (y<x) and (y<z) then writeln (y);
if (z<y) and (z<x) then writeln (z);
end.
2, 4 6 8 10 12 14 16 18 20 22 24 26 28 30 32 34 36 38 40, те что делиться на два)))