Сделайте конспект по информатике на тему пользовательский интерфейс !

===== PascalABC.NET =====

-№1-

begin

  var (Яблок, Апельсинов, Бананов) :=

     ReadInteger3('Число яблок, апельсинов и бананов:');

  var ВесЯблок := 100 * Яблок;

  var ВесАпельсинов := 150 * Апельсинов;

  var ВесБананов := 170 * Бананов;

  if ВесЯблок > ВесАпельсинов then

    if ВесЯблок > ВесБананов then

       Print('Берем яблоки')

    else

       Print('Берем бананы')

  else if ВесАпельсинов > ВесБананов then

     Print('Берем апельсины')

  else

     Print('Берем бананы')

end.

-№2-

begin

 var n := ReadInteger('Введите натуральное число;');

 var P := new HashSet<integer>;  // это множество целых

 while n > 0 do

 begin

   P += n mod 10;  // очередную цифру добавляем ко множеству

   n := n div 10

 end;

 P.Count.Println  // в множестве все элементы уникальны

end.

Задания 4 и 5:

Задание 4:

static void Main(string[] args)

       {

           int N = 10, count, sum = 0;

           int[] mas = new int[N];

           Random rnd = new Random();

           for (int i = 0; i < N; i++)

           {

               mas[i] = rnd.Next(0, 10);

           }

           Console.WriteLine("Массив: ");

           for (int i = 0; i < N; i++)

           {

               Console.Write(String.Format("{0,4}", mas[i]));

           }

           Console.WriteLine();

           Console.WriteLine();

           Console.Write("Введите количество элементов для суммирования (n): ");

           count = Convert.ToInt32(Console.ReadLine());

           if (count > N)

           {

               count = N;

               Console.WriteLine();

               Console.Write("Количество элементов не должно превышать размерность массива.");

           }

           for (int i = 0; i < count; i++)

           {

               sum += mas[i];

           }

           Console.WriteLine();

           Console.Write("Сумма первых " + count + " элементов массива = " + sum);

           Console.ReadKey();

       }

Задание 5:

static void Main(string[] args)

       {

           int N = 10, x, y, sum = 0;

           int[] mas = new int[N];

           Random rnd = new Random();

           for (int i = 0; i < N; i++)

           {

               mas[i] = rnd.Next(0, 10);

           }

           Console.WriteLine("Массив: ");

           for (int i = 0; i < N; i++)

           {

               Console.Write(String.Format("{0,4}", mas[i]));

           }

           Console.WriteLine();

           Console.WriteLine();

           Console.Write("Введите x: ");

           x = Convert.ToInt32(Console.ReadLine());

           Console.Write("Введите y: ");

           y = Convert.ToInt32(Console.ReadLine());

           if (x > N)

           {

               x = N / 2;

           }

           if (y > N)

           {

               y = N;

           }

           if (y < x)

           {

               x = N / 2;

               y = N;

               Console.WriteLine();

               Console.Write("x не должен быть больше y.");

           }

           for (int i = x - 1; i < y; i++)

           {

               sum += mas[i];

           }

           Console.WriteLine();

           Console.Write("Сумма элементов массива, с " + x + " элемента по " + y + " равна " + sum);

           Console.ReadKey();

       }

Объяснение:

Задания 4 и 5 на языке C#.