М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
nikita22o
nikita22o
11.09.2020 04:07 •  Информатика

Три целых числа подаются в столбик. Определите, сколько среди них совпадающих. Программа должна вывести число 3, если все числа совпадают. Число 2, если только 2 совпадают. Или число 0, если все числа различны. Sample Input:

14
3
14
Sample Output:

2

👇
Ответ:
Dianapro111
Dianapro111
11.09.2020

C#

using System;

using System.Linq;

public class Program

{

public static void Main()

{

 var numbers = new int[] {14, 3, 14};

 var onlyUnique = numbers.Distinct().ToArray();

 if (onlyUnique.Length == 1) Console.WriteLine(3);

 else if (onlyUnique.Length == 2) Console.WriteLine(2);

 else Console.WriteLine(0);

}

}

Объяснение:

numbers  -- массив входных чисел

Distinct() -- вернет уникальные элементи масива

4,6(8 оценок)
Открыть все ответы
Ответ:
Стас1326
Стас1326
11.09.2020
Граф - множество вершин и ребер, соединяющих эти вершины.
Он несет информацию об элементах системы и связи между ними.
Элементы системы изображаются как вершины или узлы графа.
Отношения между ними изображаются как ребра или дуги графа.
Деревом называют ациклический (то есть между любыми вершинами есть только один путь), связный (то есть от любой вершины графа можно добраться в другую) граф.
Корень дерева - это вершина с нулевой степенью захода (то есть в нее не ведут другие ребра). Для неориентированного графа это просто выбранная нами вершина.
Ветви - это ребра дерева.
Листья дерева - это вершины с нулевой степенью исхода (то есть из них не выходят ребра), т.е. не имеющих поддеревьев.
Надеюсь объяснил доступно.
4,7(71 оценок)
Ответ:
goodsmalgirl
goodsmalgirl
11.09.2020
Const
  MAX_SIZE = 10;
 
var
  a: array[1..MAX_SIZE] of integer;
  i, size: integer;
 
procedure delete_odd_elements();
var i, j: integer;
begin
  i := 1;
  repeat
    if odd(a[i]) then
    begin
      dec(size);
      for j := i to size do
        a[j] := a[j + 1]
    end
    else inc(i);
  until i > size;
end;
 
begin
  writeln('Исходный массив: ');
  size := MAX_SIZE;
  for i := 1 to size do
  begin
    a[i] := random(100);
    write(a[i] : 3);
  end;
  delete_odd_elements;
  writeln;
  writeln('Полученный массив: ');
  for i := 1 to size do
    write(a[i] : 3);
end.
4,4(49 оценок)
Новые ответы от MOGZ: Информатика
Полный доступ к MOGZ
Живи умнее Безлимитный доступ к MOGZ Оформи подписку
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ