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

1. сколько битов информации несёт сообщение о том, что из колоды в 32 карты достали " пик"? 2. производятся две лотереи: "4 из 32" и "5 из 64". сообщение о результатах какой из лотереи несёт больше информации?

👇
Ответ:
AlexMYP
AlexMYP
06.01.2020
1) 32 это 2 в пятой степени ответ 5
2) 4*5=20 бит  5*6=30 бит  ответ второе
4,4(49 оценок)
Открыть все ответы
Ответ:
Procedure TForm1.Button1Click(Sender: TObject);
var
  i1,i2,i3 : Integer;
  kk : Integer;
  Chislo : Integer;
begin
  Memo1.Clear;
  kk := 0;
  for i1 := 1 to 9 do
    for i2 := 0 to 9 do
      for i3 := 0 to 9 do
        if ( (i1<>i2) and (i1<>i3) and (i2<>i3) ) then
          if ( Frac((i1+i2+i3)/7)=0 ) then
          begin
            Chislo := i1*100 + i2*10 + i3;
            if ( Frac(Chislo/7)=0 ) then
            begin
               Memo1.Lines.Append(inttostr(Chislo));
               inc(kk);
            end;
          end;
end;


Написать программу на языке паскаль нахождения всех трехзначных чисел, у которых все цифры различны,
4,4(42 оценок)
Ответ:
thesexyone72
thesexyone72
06.01.2020

A = [] # создаем массив  

step = 3 #  создаем переменную , которая является началом нашего ряда  

while sum(A) < 15: # пока сумма нашего массива меньше 15 (sum - складывает все элементы нашего массива)

   A.append(step) # мы добавляем в  массив число

   step +=1 # и увеличиваем число в ряду на 1

print(sum(A)) # после выполнения цикла  выводим сумму  массива

A = [] # создаем массив  

step = 3 #  создаем переменную , которая является началом нашего ряда  

Num = int(input()) # просим у пользователя ввести число  

while sum(A) < Num: # пока сумма нашего массива меньше  (sum - складывает все элементы нашего массива)

   A.append(step) # мы добавляем в  массив число

   step *= 2 # умножаем шаг ряда на 2

print(sum(A)) # после выполнения цикла  выводим сумму  масиива  

Объяснение:

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