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

Информатика Разветвляющийся алгоритм. Решение задач
Решить задачи: (составить программы и блок-схему)
1) Определить, является ли заданное число а положительным.
2) Определить, является ли заданное число а четным. (вводится одно число, на экран выводится
одно из сообщений «да» или «нет»)
3) Определить, кратно ли заданное целое число а числу 7. (вводится одно число, на экран
выводится одно из сообщений «да» или «нет»)
4) Даны координаты двух точек А (x1,y1) и B(x2,y2). Определить, какая из точек ближе
расположена к оси Х. (вводится четыре числа x1,y1,x2,y2, на экран выводится одно из
сообщений «точка А» или «точка В»)
Проверять задачи на развилки нужно столько раз, сколько разных ответов может быть в задаче.
Домашняя работа.
Гороскоп по дате рождения - нумерология (предсказание по числам) - область знания,
зародившаяся в глубокой древности. Многим, наверное, знакомо суждение древнегреческого
ученого философа Пифагора: "Все вещи можно представить в виде чисел". Астрологи утверждают,
что каждому числу соответствует определенная планета. И даже последовательность букв в
имени, не говоря о дате рождения, тем или иным образом влияет на судьбу человека. По числам
составляется гороскоп, предсказывающий будущее человека, прогнозируя основные тенденции в
судьбе. В нумерологии предсказывают будущее, основываясь на дате рождения человека.
Составьте программу, которая будет определять является ли четной сумма цифр числа рождения.
Программа должна запрашивать число и выводить ответ «да» или «нет»
Пример:
Ввод
11
Вывод
да
Ввод
21
вывод
нет
Работа над задачами:
Разбор задачи 1 :
1) что дано: число а (a: real)
2) что будет результатом (d: real)
3) составление математической модели (ответ «да» будет, если а>0, во всех других случаях будет ответ
«нет»
4) Составление блок-схемы
5) Составление программы (проверить программу можно https://ideone.com/)
6) заполнение таблицы c использованием программы

👇
Открыть все ответы
Ответ:
Aslanty
Aslanty
05.05.2022
Гляди . Рассуждаем таким образом.

Единственная система счисления которая имеет на борту только "1" и "0" - это двоичная система счисления ...

Перевод выполняется таким образом : каждая цифра двоичного числа умножается на 2 , которая возводиться в степень по индексу числа , тоесть имеем число 101 - для перевода необходимо : 1*2^2 + 0*2^1 + 1*2^0 = 4+0+1(т.к любое число в нулевой степени равно 1 , даже 0^0) , = 5 - это ответ уже в 10-тичной сс.

Ещё пример, возьмём число 1010. Переведём его в десятичную сс = 1*2^3+0*2^2+1*2^1+0*2^0 = 10 ...

Граматика : 2^3 - переводиться как 2 в 3 степени.Решаем твою задачу, имея на экране теорию ..

10100 детей - закодировано в 2-чной сс , выполним перевод в 10-чную сс = 1*2^4+(пропускаем нули, их умножать бесполезно)+1*2^2 ... (остальное нули) = 16+4 = 20 детей в классе

Считаем колличество мальчиков в классе - 1100 - это 1*2^3+1*2^2 = 12 - вот столько мальчиков

Вычитаем из общего колличества детей колличество мальчиков , получаем = 20-12 = 8;

ответ: 8.
4,6(20 оценок)
Ответ:
Снежка411
Снежка411
05.05.2022

//PacalABC.NET 3.4.2

//Используется формула аналогичная формуле Бине для чисел

//Фибоначчи

const

 index = power(33, 0.5);

 a1 = power((19 + 3 * index), 1 / 3);

 a2 = power((19 - 3 * index), 1 / 3);

 b = power((586 + 102 * index), 1 / 3);

var

 n, i: smallint;

 x: uint64;

function tribonacthi(n: smallint): biginteger;

begin

 if (n = 1) or (n = 2) then result := 0

 else

   result := RoundBigInteger(3 * b * ((power((1 / 3 * (a1 + a2 + 1)), n - 1)) / (power(b, 2) - 2 * b + 4)));

end;

begin

 try

   n := readinteger('Введите n:');

   x := readinteger('Введите x:');

 except

   on system.formatexception do

   begin

     writeln('Неверный формат ввода');

     exit;

   end;

 end;

 writeln('1)', tribonacthi(n), ' ');

 write('2)');

 i := 1;

 while (tribonacthi(i) < x) do

 begin

   write(tribonacthi(i), ' ');

   i += 1;

 end;

end.

4,8(28 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
Полный доступ к MOGZ
Живи умнее Безлимитный доступ к MOGZ Оформи подписку
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ