samsludmila
?>

Составить блок-схему к рещению задачи.

Информатика

Ответы

mixtabak2

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.

annaan-dr582

Существует такое высказывание, что наше будущее только в наших руках. Я абсолютно и полностью с этим согласна. Каждый человек строит свою жизнь так, как он того сам хочет. Конечно, существуют некоторые обязательства перед близкими людьми или обществом в целом, которые необходимо соблюдать и брать во внимание. Но во всем остальном мы сами воздвигаем для себя свое будущее.

От чего зависит будущее.

Единственным исключением, на мой взгляд, в устройстве жизни могут быть некоторые независящие от человека факторы. Но даже при наличии таковых, каждый из нас стремится к своей цели, преодолевая любые препятствия.

Только ленивый человек не строит своего будущего.

Ведь, если хорошенько задуматься, то от будущего каждого отдельно взятого человека, зависит будущее целой страны, а в итоге и мира. К сожалению, когда мы совершаем какой-либо поступок, не всегда задумываемся, как он может повлиять на окружающих нас людях. Хорошо, если совершаемое нами действо, положительным образом отразится на семье, друзьях или коллегах, а вот если наоборот. Чтобы избежать этого “если”, необходимо всегда думать не только о своем будущем, но и о будущих последствиях.

Я очень надеюсь что , если не сложно поставьте лучший ответ

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Составить блок-схему к рещению задачи.
Ваше имя (никнейм)*
Email*
Комментарий*