Var
x,s:real;
n,i:integer;
begin
write('Введите n и x: ');
readln(n,x);
for i:=1 to n do s:=s+cos(power(x,i));
writeln('y=',s)
<span>end.</span>
(a, b, c) означает, что в 12-литровой a литров, в 7-литровой b, а в 5-литровой c.
0) (12, 0, 0)
1) (7, 0, 5)
2) (7, 5, 0)
3) (2, 5, 5)
4) (2, 7, 3)
5) (9, 0, 3)
6) (9, 3, 0)
7) (4, 3, 5)
8) (4, 7, 1)
9) (11, 0, 1)
10) (11, 1, 0)
11) (6, 1, 5)
12) (6, 6, 0)
1 Мбайт = 1024 Кбайт
1/16 Мбайта = 64 Кбайта
64 Кбайт = 65536 байт
65536 байт = 524288 бит
2^i = 16; i = 4;
524288 / 4 = 131072 символов