Напишите программу на языке pascal. программа должна находить сумму чисел заданных формулой, в отчёте укажите листинг программы.s=sin3x+sin4x+sin5x++sin11x
Дано: N=26*2+10=62 символа кол-во пользователей - 30 Всего байт - 870 байт кол-во символов на один пароль - 10 символов Решение: воспользуемся формулой , где N - кол-во символов в алфавите, i - информационная емкость одного символа(кол-во бит на 1 символ) тогда: ищем ближайшие степени двойки: берем 2^6, так как в 2^5 не влезет 62 символа. в итоге i=6 бит определим кол-во бит на один пароль: 6*10=60 переведем в байты, округляя в большую сторону:
60/8=7,5≈8 байт определим кол-во байт на 1 пользователя: 870/30=29 байт из этих 29 байт 8 байт отведено на пароль, остальное - дополнительные сведения. тогда: 29-8=21 байт - дополнительные сведения ответ: 21
Дано: N=26*2+10=62 символа кол-во пользователей - 30 Всего байт - 870 байт кол-во символов на один пароль - 10 символов Решение: воспользуемся формулой N=2^i, где N - кол-во символов в алфавите, i - информационная емкость одного символа(кол-во бит на 1 символ) тогда: 62=2^i ищем ближайшие степени двойки: 2^5=32 2^6=64 берем 2^6, так как в 2^5 не влезет 62 символа. в итоге i=6 бит определим кол-во бит на один пароль: 6*10=60 переведем в байты, округляя в большую сторону: 60/8=7,5≈8 байт определим кол-во байт на 1 пользователя: 870/30=29 байт из этих 29 байт 8 байт отведено на пароль, остальное - дополнительные сведения. тогда: 29-8=21 байт - дополнительные сведения ответ: 21
, где N - кол-во символов в алфавите, i - информационная емкость одного символа(кол-во бит на 1 символ)
program raf105;
var
i: byte;
sum, x: real;
begin
write('Введите x: ');
readln(x);
for i:=3 to 11 do
sum:= sum + sin(i*x);
writeln('S = ',sum);
end.
PascalABC 3.4.2