Сообщение содержит 36 символов, т.е. скорость передачи 36/0.00001 = 3.600.000 символов в секунду, после чего можно говорить, что некорректно задан вопрос,т.к. не указана кодировка символов. Если она указана, то 3.600.000 умножаешь на количество бит, которыми кодируется символ
Условием проверяй, какое число больше.
Const n=15;
var a,s:array [1..100] of integer;
i,j:integer;
begin
for i:=1 to n do begin
a[i]:=random(15);
write(a[i],' ');
end;
j:=1;
writeln;
writeln('Полученный массив');
for i:=1 to n do begin
if (a[i] mod 2 = 0) and (a[i]>0) then begin
inc(j);
s[j]:=a[i];
write(s[j],' ');<span>
end;
end;</span>
512 цветов это 2^9 т.е глубина цвета 9 бит
переведём объем в биты
3600*8=28800 бит
определим количество точек
28800/9= 3200 точек