М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
кпаприрр
кпаприрр
15.02.2020 21:07 •  Информатика

Задана последовательность положительных чисел от 1 до 10. Напишите программный алгоритм, который вычисляет сумму чисел во встроенной программной среде.

👇
Открыть все ответы
Ответ:
Desant1111
Desant1111
15.02.2020

#include <iostream>

using namespace std;

int fib (int position);

int main()

{

int answer,position;

cout<<"Which position(k) ?";

cin >> position;

cout << "\n";

answer= fib(position);

cout <<answer<< " (k) is the position";

cout <<position << "Fibonachi number.\n";

return 0;

}

int fib(int n)

{

int minusTwo=1, minusOne=1,answer=2;

 if (n<3)

  return 1;

for (n-=3;n;n--)

{

 minusTwo=minusOne;

 minusOne=answer;

 answer=minusOne + minusTwo;

}

return answer;

}

Объяснение:

Наскільки я зрозумів це задача на визначення значення порядкового номера ряду Фібоначчі ,тому ось вихідний код на C++

4,4(4 оценок)
Ответ:
MashaLipitenko
MashaLipitenko
15.02.2020
Функция isSevenHere возвращает истину, если в числе есть семерка, и ложь - если ее нет. В цикле for перебираем все значения от 1 до K (число, введенное с клавиатуры), и выводим на экран только те, где есть семерка.

Код программы:

function isSevenHere(number : integer) : boolean;var digit : integer;begin  Result := true;  while (number > 0) do  begin        digit := number mod 10;    if (digit = 7) then            exit;    number := number div 10;  end;  Result := false;end;
var i,k :integer;begin  write('Введите k: ');  readln(k);
  for i := 1 to k do    if (isSevenHere(i) = true) then      write(i,' ');end.
Найти и вывести на экран все целые числа из промежутка от 1 до k, в десятичной записи которых есть ц
4,8(36 оценок)
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ