Информатика Разветвляющийся алгоритм. Решение задач Решить задачи: (составить программы и блок-схему) 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 использованием программы
Ответы
//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.
Ответить на вопрос
Поделитесь своими знаниями, ответьте на вопрос:
Популярные вопросы в разделе
Переведи число 10458 в десятичную систему счисления.
Как выключить индикатор G на клавиатуре
Программирование линейных алгоритмов, информатика 8 класс
Единственная система счисления которая имеет на борту только "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.