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

Решить с рекурсивной функции или процедуры. pascal. сформировать множество из цифр натурального числа.

👇
Ответ:

function foo(n: integer): set of integer;

begin

 if n = 0 then result := []

 else

   result := [n mod 10] + foo(n div 10)

end;

begin

 var a := 12345;

 var s: set of integer := [];

 s := foo(a);

 Print(s)

end.

4,7(70 оценок)
Открыть все ответы
Ответ:
LadaSova
LadaSova
28.06.2021

Системное ПО обеспечивает работу компьютера (загрузка ядра, драйверов, проверка портов, синхронизацию устройств и протоколов передачи данных, чтение, передачу данных, осуществляют слежение за устройствами ввода-вывода и реагируют на команды с них и т. д.) . Прикладные программы используют системное ПО, но выполняют действия и функции не влияющие на систему, а имеющие прикладное значение (просмотр и обработка видео, математические вычисления, запись на внешние носители, игры...).

Объяснение:

незнаю проавельный это ответ или нет

4,7(66 оценок)
Ответ:
Saaabiii
Saaabiii
28.06.2021

ответ: 1499 9949

Python:

def f(n):

   digits = [int(i) for i in str(n)]

   # 1

   first_sum = digits[0] + digits[1]

   # 2

   second_sum = digits[1] + digits[2]

   # 3

   third_sum = digits[2] + digits[3]

   # 4

   amounts = [first_sum, second_sum, third_sum]

   del amounts[amounts.index(min(amounts))]

   # 5

   amounts.sort()

   return int(str(amounts[0]) + str(amounts[1]))

numbers = []

for x in range(1000, 10000):

   if f(x) == 1318:

       numbers.append(x)

print(numbers[0], numbers[-1])

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