#include <iostream>
#include <cmath>
using namespace std;
int x,n;
double r;
int main()
{
r = 0;
cin >> n;
double *ptrarray = new double[n];
for (int i = 0; i < n; i++)
{
cin >> x;
ptrarray[i] = cos(2*x) + 3;
if (fmod(ptrarray[i],2) != 0
{
r=r*ptrarray[i];
}
}
cout << r;
return 0;
}
Условие Фано несложно. Оно гласит, что никакой код символа не может быть началом кода любого из остальных кодируемых символов.
Если А=0, то ни один иной символ не может начинаться с 0.
Если В=10, то ни один иной символ не может начинаться с 10.
Поскольку код 100 уже содержит в начале 10 - код буквы В, он не может быть кодом какой-то буквы, а будет декодирован, как ВА
Var s:string; i:integer; m:set of char;
begin
writeln('Введите слово:');
readln(s);
m:=[];
i:=1;
while i<=length(s) do
if s[i] in m then delete(s,i,1) else begin m:=m+[s[i]]; i:=i+1; end;
writeln(s);
end.
Пример:
Введите слово:
электрификация
электрифаця
<span>const n = 5; var a: array[1..n] of integer;
i, k: integer;
s: real;
begin
s := 0;
for i := 1 to n do
begin
readln(a[i]);
s := s + a[i];
end;
s := s / n;
writeln('Среднее значение = ', s:0:3);
k := 1;
for i := 2 to n do
if abs(a[k] - s) > abs(a[i] - s) then k := i;
writeln('Индекс элемента: ', k, ' Значение = ', a[k]);
end.</span>