function fibonacchi(x:integer):integer;
// функция возвращает порядковый номер введённого числа
// ряда Фибоначчи. Если число не является элементом
// из данного ряда, то функция возвращает -1
var counter:integer = 2;
s1,s2,s3:integer;
begin
s1 := 0;
s2 := 1;
s3 := 0;
if x = 0 then fibonacchi:=1
else if x = 1 then fibonacchi:=2
else begin
while s3 < x do begin
s3 := s1 + s2;
s1 := s2;
s2 := s3;
inc(counter);
end;
if s3 = x then fibonacchi:=counter
else fibonacchi:=-1;
end;
end;
begin
write(fibonacchi(13));
end.
Существует такое высказывание, что наше будущее только в наших руках. Я абсолютно и полностью с этим согласна. Каждый человек строит свою жизнь так, как он того сам хочет. Конечно, существуют некоторые обязательства перед близкими людьми или обществом в целом, которые необходимо соблюдать и брать во внимание. Но во всем остальном мы сами воздвигаем для себя свое будущее.
От чего зависит будущее.
Единственным исключением, на мой взгляд, в устройстве жизни могут быть некоторые независящие от человека факторы. Но даже при наличии таковых, каждый из нас стремится к своей цели, преодолевая любые препятствия.
Только ленивый человек не строит своего будущего.
Ведь, если хорошенько задуматься, то от будущего каждого отдельно взятого человека, зависит будущее целой страны, а в итоге и мира. К сожалению, когда мы совершаем какой-либо поступок, не всегда задумываемся, как он может повлиять на окружающих нас людях. Хорошо, если совершаемое нами действо, положительным образом отразится на семье, друзьях или коллегах, а вот если наоборот. Чтобы избежать этого “если”, необходимо всегда думать не только о своем будущем, но и о будущих последствиях.
Я очень надеюсь что , если не сложно поставьте лучший ответ
var x, y: real;
begin
Read(x);
y:=2/3*x*x*x-sqr(x);
Write(y:0:3); {3 знака после запятой}
end.
// Если тебе не нравится х*х*х, используй sqr(x)*x. Если все равно не устраивает, пиши exp(3*ln(x)). Это универсальная формула, где 3 – третья степень.