16*16=256
Получается 16 в степени 2
((b + sqrt(sqr(b)+4*a*c))/(2*a)) - power(a,3)+power(b, -2);
(a/c) * (b/d) - ((a*b-c)/(c*d));
((sin(x)+cos(y))/(cos(x)-sin(y)))*tan(x*y);
x - (power(x,3)/3)+(power(x,5)/5);
Program pr1;
Var A:array [1..10] of integer;
i,k:integer;
begin
for i:=1 to 10 do
read (A[i]);
k:=0;
for i:=1 to 10 do
if A[i] mod 2=0 then
k:=k+1;
writeln;
writeln (k);
end.
наверное так, но лучше проверь в паскале
Шаг в перед и назад вроде