Каждый символ может иметь 64 значения, то есть 2^6, тогда на каждый символ выделяется 6 бит.Всего символов - 100. Значит всего нужно 6*100=600 бит=75 байт.
// PascalABC.NET 3.3, сборка 1611 от 06.01.2018
// Внимание! Если программа не работает, обновите версию!
Begin
var a:= ArrRandom(15,20,84);a.PrintLn;
Writeln(a.Where(t -> (t.isOdd)and(t mod 3 = 0)and(t mod 10 <> 0)).Count);
end.
Пример:
64 64 76 31 21 81 53 30 58 38 66 69 57 65 41
4
Program z;{a1=6,d=}const n=7;var a:array[1..n] of real;a1,i:integer;d:real;begina1:=6;d:=(49-6)/7;for i:=1 to n do begina[i]:=a1+(i-1)*d;writeln(a[i]:3);end;
end.
I=K*I
N=2^i
256=2^i
i=8 бит
I=3,5*1024*8=28672бит
K=I/i
K=28672/8=3584 символа
#Язык Python
from math import sin, cos, pi
x = -pi/2
def func(x):
return(7*sin(x)**2)/(3*sin(x) - 2*cos(x))
while(x<pi/2):
print("При x = " + str(x) + "; F = " + str(func(x)))
x += pi/19