Var f,g,e:integer;
a,x,w,h:real;
begin
readln(f,g,e);
a:=((power(f-g,3)-7)/power(g+e,2))-7*((e*f-power(f,2*(g/3)))/(25-g));
writeln(a:10:8);
x:= (power(43,2)*a)-power(42,2)*(g/27.3)+((16+g)/(g-e));
writeln(x:10:8);
w:=(x/100)+(power(25,2)/x)+(a/(3*f))-((g+power(e,2))/(e+power(g,2)));
writeln(w:10:8);
h:=g-power(f,2)-((7*power(e,2)*w)/3)-(power(x,2)/(4.5*f*e));
writeln(h);
readln
end.
К отличительным признакам объекта относят свойства, действия, поведение, состояние.
Свойства объекта определяются некоторыми величинами, показывающими отличие одного объекта от другого.
Действия показывают что может делать объект или что можно делать с объектом.
Поведение - это подробное описание каждого из действий объекта.
Состояние - это полный набор свойств, которые имеет объект в данное время.
Получается, что состояние перечисляет свойства, а поведение объясняет, что из себя представляют действия.
5 раз больше не ту!!!!! а тут что так трудно
Var
i,m,n,s:integer;
function fact(a:integer):integer;
var l:integer;
begin
l:=1;
for i:=2 to a do
l:=l*i;
fact:=l;
end;
begin
read(m);
readln(n);
s:=0;
for i:=m to n do
if i mod 2=0
then s:=fact(i)+s;
writeln('Suma: ',s);
end.
1)
int f(int x,int p, int y)
{int k=0;
while(x<y)
{
x=+p*x/100;
k++;
}
return k;
}
2)
int f(int A)
{int x=1, y=1, n=2;
while(x<A || y<A)
{
if(x<y)
x=+y;
else
y=+x;
}
n++;
}
if(A=y || A=x )
return n;
else
return -1;
}