Составьте блок-схему по задаче
Задан одномерный числовой массив размером n. Удалить его k-й элемент, смещая все, что стояло за ним, вперед на одно место, что бы не было «дырки» в массиве. Полученную последовательность чисел разместить в два новых массива, включая в первый элементы с четными индексами, а во второй с нечетными. Полученные массивы вывести на печать.

63

Объяснение:

  Значащие разряды - цифры влияющие на конечный результат, например: 11001-все цифры значащие, 0010110 - два нуля в начале не значащие, их можно отбросить, но по условию даётся целое число, которое преобразовывают в двоичную систему, значит не значащих чисел там не должно быть.

   Т.к. по условие R меньше 100 и является результатом алгоритма запись R не должна включать 8 чисел (2^7=128), 8 чисел мы получаем только если в исходном их 4, значит ищем число с 3 знаками.

  Самое большое двоичное число из 3 знаков - 111,(7 в десятичной-нечётное) по алгоритму добавляем ещё 3 единицы. Получается 111111 в двоичной, тоесть 63.

Могу подсказать только 1 вариант:

Объяснение:

Module Module1

   Sub Main()

       Dim x As Single

       Dim y As Single

       Console.WriteLine("Введите координаты точки x ")

       x = Console.ReadLine()

       Console.WriteLine("Введите координаты точки y ")

       y = Console.ReadLine()

       If (x <= 4 And y <= 4 And y >= 4 - x) Or (y <= -4 - x And y >= -4 And x >= -4) Then Console.WriteLine("Точка принадлежит области") Else Console.WriteLine("Точка не принадлежит области")

       Console.ReadKey()

   End Sub

End Module