Fortif-типо токого,как то так
Дан алфавит с N символоми.
Для начала, нужно определить мощность алфавита (I). Это количество бит информации на 1 символ этого алфавита. Суть в том, чтобы каждой букве алфавита (включая плобельные символы и знаки препинания) поставить в соответствие уникальное двоичное число, которое будет кодом этой буквы. Это можно сделать по формуле (скобки в формуле - округление к большему)
Если затем перемножить количество символов в сообщении (М) на вес одного символа (I), получим вес сообщения.
Ответ:
I.XI.MMXIX
Объяснение: Римская система счисления - непозиционная
1)62.625
2)25.05
3)15.65625
program xxx;
var i, n, s : integer;
begin
write('введите число N=');
readln(n);
s:=0;
i:=2;
while i<=n do
begin
s:=s+i;
i:=i+2
end;
write('сумма четных чисел =', s);
readln
end.