Program z;
Var N,k:integer;
Begin
k:=0;
If N<5 then k:=k+1;writeln(k);
End.
Ето о чем-то рассказывается, о чём то повествуется, о чём то повидомляется
1
2
3
4
5
6
umn_matrix<span>(</span><span>[</span><span>]</span><span>,</span>_<span>,</span><span>[</span><span>]</span><span>)</span><span>.</span>
umn_matrix<span>(</span><span>[</span>Stroka<span>|</span>Tail<span>]</span><span>,</span>Vector<span>,</span><span>[</span>A<span>|</span>ATail<span>]</span><span>)</span><span>:-</span>umn_stroka<span>(</span>Stroka<span>,</span>Vector<span>,</span>A<span>)</span><span>,</span> umn_matrix<span>(</span>Tail<span>,</span>Vector<span>,</span>ATail<span>)</span><span>.</span>
umn_stroka<span>(</span><span>[</span><span>]</span><span>,</span>_<span>,</span><span>0</span><span>)</span><span>.</span>
umn_stroka<span>(</span><span>[</span>E1<span>|</span>Tail<span>]</span><span>,</span><span>[</span>E2<span>|</span>Tail2<span>]</span><span>,</span>Ans<span>)</span><span>:-</span>umn_stroka<span>(</span>Tail<span>,</span>Tail2<span>,</span>TempAns<span>)</span><span>,</span> Ans <span>is</span> TempAns<span>+</span>E1<span>*</span>E2<span>.</span>
Y:=x*Cos(x)*Ln(abs(x) ) / sqrt(1+ x*x*x)
Z:=sqrt(abs(10*y-sin(2*Pi*y)) )*(1/Tan(x+y)-1)/18
N=
N - палитра (количество цветов)
i - кол-во бит на пиксель. По задаче - 3 бита.
N=
N=8