<h2>=EXP(x) - ACOS(x)</h2>
где x - ячейка, содержащая число x.
ХакерОнлайн. А что, мне нравиться
13 символів, так як один символ=1 біт
Function prime(n:longint):boolean;
var i,j:longint;
p:boolean;
Begin
p:=true;
if (n mod 2)=0 then p=false;
i:=3;j:=round(sqrt(n));
while (i<=j)and(p) do
Begin
if(n mod i)=0 then p=false;
inc(i,2);
end;
prime:=p;
end;