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

Мінімус і Максимум на дереві Заданий масив цілих чисел. Створити з них Бінарне Дерево Пошуку. Реалізуйте методи Min i Max які знаходять мінімальний і максимальний елемент в дереві.​

👇
Открыть все ответы
Ответ:
permyakov2001
permyakov2001
04.07.2021
var
  a, b: integer;
begin
  readln(a, b);
  writeln(System.Math.Sign(a) = System.Math.Sign(b) ? 'Да' : 'Нет');
end.

Или  ̶п̶р̶и̶м̶и̶т̶и̶в̶н̶е̶е̶  проще:
var
  a, b: integer;
begin
  readln(a, b);
  if (a > 0) then a := 1;
  if (a = 0) then a := 0;
  if (a < 0) then a := -1;
  if (b > 0) then b := 1;
  if (b = 0) then b := 0;
  if (b < 0) then b := -1;
  if (a = b) then
    writeln('Yes')
  else
    writeln('No');
end.

Немного  ̶у̶п̶р̶о̶̶щ̶̶ё̶н̶н̶ы̶й̶  оптимизированный вариант:
var
  a, b: integer;
begin
  readln(a, b);
  if (a > 0) then 
    a := 1
  else
    if (a = 0) then
      a := 0
    else
      a := -1;
  if (b > 0) then 
    b := 1
  else
     if (b = 0) then 
       b := 0
     else
       b := -1;
  if (a = b) then
    writeln('Yes')
  else
    writeln('No');
end.
4,7(97 оценок)
Ответ:

1) Модель - это упрощённая копия чего - либо. Моделирование - создание моделей. В его основе - упрощение и повторение. 2) Модель здания, модель автомобиля, например - игрушки детей это модели. 3) Внутри компьютера можно создать более точные модели, а также - там это гораздо проще. Также в компьютере можно испытать модель в симуляции. 4) Модуляция - упрощение. Демодуляция - усложнение. 5) Их нельзя потрогать, увидеть (Только в схеме), но можно понять. 6) Имеющая свойственную этой модели структуру, модель.

4,7(61 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ