Количество вхождений символа в строку, а также позиция символа в строке - это целочисленные величины. Если язык программирования допускает множество представлений целых величин, можно выбирать любое из них, поскольку найденные значения будут лежать в диапазоне [1;20] - по количеству символов в строке.
Можно зашифровать слово такт, т.к. первая и последняя буква этого слова одинаковы, так же, как первый и последний значок шифра.
var x,s,p:integer;
begin
p:=1;
while s<300 do begin
readln(x);
if x mod 3=0 then p:=p*x;
s:=s+x;
end;
if p<>1 then writeln(p) else writeln('0');
end.
Для того чтобы перевести число из 10с/с в 2 с/с надо делить число на 2 до тех пор пока остаток не станет меньше двух