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.
Відповідь:
Профориентация
Школьникам
Взрослым
Студентам
Тесты
Список профессиий
FAQ
Статьи
Книги
Задать вопрос
ПрофГид
Профессии
Информационные технологии (IT)
Показаны записи 1-20 из 70.
Аналитик
Компьютерный лингвист
Инженер-программист
Архитектор интеллектуальных систем управления беспилотного транспорта
UI-дизайнер
UX-аналитик
UX-дизайнер
Художник компьютерной графики
Лингвоэксперт
Intelligent Systems Developer
Агроинформатик, агрокибернетик
Quant developer
Data Mining Specialist
BI разработчик (BI архитектор)
Программист Kotlin
Программист JavaScript
Программист C++
Биоинформатик
Архитектор информационных систем
Сценарист компьютерных игр
Пояснення:
Поделитесь своими знаниями, ответьте на вопрос:
Вбутылке, стакане, кувшине и банке находятся «пепси», «кока-кола», квас и «спрайт». известно, что «спрайт» и «пепси» не в бутылке, сосуд с «кока- колой» находится между кувшином и сосудом с квасом, в банке – не «кока- кола» и не «спрайт». стакан находится около банки и сосуда с «пепси». как распределены эти жидкости по ?