Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
в одном байте восемь бит. следовательно 100/8=12.5
ответ 12.5
на паскале:
program myprogram; var n,i,fact: integer; sum: real; beginsum: =0; fact: =1; writeln('введите число n.'); readln(n); for i: =1 to n dobeginfact: =fact*i; sum: =sum+1/fact; end; writeln('сумма 1/1! +1/2! +1/3! ++1/n = ',sum); end.
1)
var
i,n: integer;
begin
readln(n);
for i: =1 to n do writeln(i*i);
end.
2)
for i: =1 to 10 do writeln(i: 2,'*',n,'=',i*n: 3);
3)
var i,n: integer; p: real;
begin readln(n); p : = 1; for i : = 1 to n do p : = p * i; writeln(p: 15: 0); end.
4)
for i: =1 to n do if (i mod 2=0) then writeln(i);
5)
i,n,k: integer;
k: =0;
for i: =1 to n do if (i mod 15=0) then k: =k+1;
writeln(k);
15 гб = 15360 мбайт = 122880 мбит
32 мин = 1920 с.
скорость = 122880/1920 = 64 мбит/с
Популярные вопросы