256=2^8 --> 8 бит для кодировки одного пикселя
F =15*15*8 бит =1800 бит = 15*15 байт =225 байт
Если я всё правильно понял, то вот:
var x: array [0..15] of integer;
sum,pr,i,max:longint;
begin
randomize;
sum:=0;
pr:=1;
For i:=1 to 15 do x[i]:=random(5)+1;
For i:=1 to 15 do
begin
sum:=sum+x[i];
pr:=pr*x[i];
end;
if pr>sum then max:=pr else max:=sum;
writeln(max);
<span>end.</span>
83531можна так а можна просто перевернути
Чеееееееееееееееееееееееееееееееем?