Составить функцию, которая определяет, сколько зерен - вопрос №2782706 от актан9ша 15.08.2021 11:30

Question

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

актан9ша · Answer

Function ChessCell(n:integer):int64;var  i:integer;  k:int64;begin  k:=1;  for i:=2 to n do k:=k*2;  ChessCell:=kend;...