Var k, n, i: integer;
sum: real;
begin
readln(n, k);
sum:=16;
for i:=1 to n-1 do
sum:=sum+k/i*3;
writeln(sum);
end.
Я думаю что так: 144.69.20.35.1.2
1 часть - базовая (от 0 до 127)
2 часть - расширенная (со 128 до 255), является национальной, там располагаются национальные алфавиты, отличные от латинского
Ответ во втором задании будет 38