#include < stdio.h> # define in "input.txt"# define out "output.txt"unsigned long long sum(int n){unsigned long long otv=0; for (int i=1; i*i< =n; i++)if %i)){otv+=i; if(i*i! =n)otv+=n/i; }return otv; }int main(void){unsigned long long n,otv=0; freopen(in,"r",stdin); freopen(out,"w",stdout); scanf("%i64d",& n); otv=sum(n); printf("%i64d",otv); return 0; }
Ответ дал: Гость
если n это количество чисел, начинаем с 3
var
i,n,p: integer
begin
readln(n);
i: =3;
p: =1;
while i< =3*n do
begin
p: =p*i;
i: =i+3;
end;
writeln(p);
end.
если n это верхняя граница чисел
var
i,n,p: integer
begin
readln(n);
for i: =3 to n
if i mod 3 = 0 then
p: =p*i;
writeln(p);
end.
Ответ дал: Гость
var a: integer;
begin
read(a);
a: =a*a;
a: = a*a;
writeln(a);
end.
Ответ дал: Гость
алфавит состоит из 8 символов, следовательно, каждый символ кодируется 3 битами информации. в 1 байте 8 бит, значит, каждый байт содержит 2 символа при таком способе кодировки. за 1 секунду по каналу связи передается 1024 бита, из них - (1024/8)*2 = 256 бит сообщения. отсюда следует, что скорость передачи сообщения составляет 256 бит/сек (бит в секунду).
Популярные вопросы