Задать вопрос
30 июля, 21:07

Составить функцию, которая определяет, сколько зерен попросил положить на N-ую клетку изобретатель шахмат (на 1-ую - 1 зерно, на 2-ую - 2 зерна, на 3-ю - 4 зерна, ...) Пример: Введите номер клетки: 28 На 28-ой клетке 134217728 зерен.

+5
Ответы (1)
  1. 30 июля, 22:31
    0
    Function ChessCell (n:integer) : int64;

    var

    i:integer;

    k:int64;

    begin

    k:=1;

    for i:=2 to n do k:=k*2;

    ChessCell:=k

    end;
Знаете ответ?
Сомневаетесь в ответе?
Найдите правильный ответ на вопрос ✅ «Составить функцию, которая определяет, сколько зерен попросил положить на N-ую клетку изобретатель шахмат (на 1-ую - 1 зерно, на 2-ую - 2 ...» по предмету 📘 Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Смотреть другие ответы
Похожие вопросы по информатике
помогите решить задачки по Паскалю "4": Составить функцию, которая определяет сумму всех чисел от 1 до N и привести пример ее использования.
Ответы (1)
Задача. По древней легенде мудрец, придумавший шахматы потребовал у персидского шаха такое вознаграждение: Пусть на шахматную доску кладут зёрна: на 1-ую 1 зерно, на 2-ую - 2 зерна, на 3-ую - 4 зерна, на 4-ую - 8 зёрен. (т. е.
Ответы (1)
1) Составить функцию, которая определяет наибольшее из трех чисел и привести пример ее использования. Пример: Введите три числа: 28 15 10 Наибольшее число: 28 2) Составить функцию, которая определяет сумму всех чисел от 1 до N и привести пример ее
Ответы (1)
На шахматной доске 64 клетки. На первую клетку кладут 1 зерно, на вторую-2 зерна, на третью - 3 зерна и т. д.: на каждую следующую клетку кладут на одно зерно больше, чем на предыдущую.
Ответы (1)
Задание 1. Ввести номер месяца и вывести количество дней в нем, а также число ошибок при вводе. Пример: Введите номер месяца: -2 Введите номер месяца: 11 В этом месяце 30 дней. Вы вводили неверно 1 раз. Задание 2.
Ответы (1)