Ха ты уверена что задача ,именно надо дано решение и формула всего напоминает физику
6 видов сигнала.
Для кодирования 1 сигнала необходимо 3 бита, т.к. 22<6<23 или 4<6<8.
Для кодирования 100 сигналов необходимо: 100*3=300 бит.
Переведем в байты:
300\8=37,5 байт.
Округляем (в большую сторону) до 38 байт.
X:=4;
y:=16;
t:=4;
x:=0; (остаток от деления 16 на 4)
y:=5; (4+1)
как то так
P.S. в скобках мои пояснения их писать не надо
var n,a,max,i:integer;
begin
readln(n);
max:=-30001;
for i:=1 to n do
begin
read(a);
if (a mod 2=0)and(a>max) then max:=a;
end;
if max<>-30001 then writeln(max)
else writeln('No');
end.
Пример:
5
12 65 74 87 64
74