написать на паскале
Просто программу 2 задание

print("загадайте число!")

x = 0

y = 101

count = 0

print("50")

kod = input()

while kod != "=":

   if kod == "<":

       y = y - (y - x) // 2

       count = y - (y - x) // 2

   if kod == ">":

       x = x + (y - x) // 2

       count = x + (y - x) // 2

   print(count)

   kod = input()

Объяснение:

вы загадываете число

дальше программа вы водит предположительное число

если ваше число меньше этого то вы пишите "<", если больше то вы пишите ">", если программа у гадала ваше число то вы пишите " ="

Объяснение:

using System;

public class Program

{

public static void Main()

{

 int[] A = new int[30];

 var rand = new Random();

 for(int i = 0; i < 30; i ++) // Заполняем в цикле массив случайными числами от 0 до 100

  A[i] = rand.Next(0, 100);

 int kolichestvo, summa;

 kolichestvo = 0;

 summa = 0;

 for(int i = 0; i < 30; i ++) //цикл по элементам массива

 {

  if((A[i] % 5) == 0)// операция "%" - остаток от деления, если = 0 значит поделилось нацело, если не равно нулю, значит поделилось с остатком

  {

   if((A[i] % 3) != 0)

   {

    kolichestvo = kolichestvo + 1;

    summa = summa + A[i];

   }

  }

 }

       Console.Write("Сумма: ");

 Console.Write(summa);

 Console.Write(" Количество: ");

 Console.Write(kolichestvo);

}

}