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

Сколько букв содержит в себе алфавит если одна несёт 6 бит информации​

👇
Открыть все ответы
Ответ:
вова966
вова966
30.01.2023
Грубо говоря оператор switch проверяет значение переменной под скобкой.

switch (variableName) // в скобках переменная которую вы проверяете (string или integer)
{
  case value1: // вместо value1 можно написать число или строку, с которым вы сравниваете variableName
{
    // код в этих скобках будет выполняться в случае если переменная variableName будет равна значению case ( в данном случае value1 )
}
break; // break нужен для того чтобы не выполнялся код из следующих case.
case value2: {
  // Если variableName == value2
}
break;
case value3: case value4: case value5:{
  // если variableName будет равна одному из трех значений (value3,value4,value5)
}
default:{
  // код будет выполнен если ни один из case не сработал. Т.е если переменная не была равна ни одному из определенных значений.
}
break;
}

Рекомендую смотреть код и комментарии в редакторе кода, потому что здесь перенос строки все портит (читать невозможно).
4,5(74 оценок)
Ответ:
polisavostina
polisavostina
30.01.2023
Var a:array[1..10] of integer;
  k,n,i:integer;
  min:INTEGER;
begin
  randomize; N:=10; k:=0 {кол-во отрицательных элементов};
  writeln ('исходный массив');
  for i:=1 to N do
  begin
   if random(2) =1 then a[i]:=random(100)
     else begin k:=k+1; a[i]:=-random(100); min:=a[I] end;
   write(a[i]:5);
  end;
  writeln;
  {поиск минимального положительного}
  if (k<>0) or (k<>N) then  {есть отрицательные или не все отрицательные}
  begin
    for i:=1 to N do
     if  (a[i]>0) and (a[i]<min) then  min:=a[i];
  {замена}
    for i:=1 to N do
     if  (a[i]<0)  then  a[i]:=min;
  end;
  writeln('Новый массив')
    for i:=1 to N do      write(a[i]:5);
end.
4,8(81 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ