В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
sasharudich
sasharudich
27.08.2020 10:56 •  Информатика

Выбери верные ответы.

неполное ветвление
полное ветвление

Словесное описание ветвления

Если <условие> то <действие 1> иначе <действие 2>;
Если <условие> то <действие 1>;

Показать ответ
Ответ:
PodolskayaOlli
PodolskayaOlli
06.01.2022 10:42
Вариант №1 (не совсем удачный, как было отмечено в комментариях).

//PascalABC.NET (версия 3.1, сборка 1210 от 29.03.2016)
var n,i,m:integer;
flag:boolean;

begin
  readln(n);
  flag:=false;
  if (n mod 2<>0)then i:=n-1 else i:=n;
  while i>0 do begin  
    if power(2,i)<=n then begin
      write(power(2,i),' '); flag:=true;
    end;
    i:=i-2;
end;
if not flag then writeln(0);
end.

Тест №1
1025
1024 256 64 16 4

Тест №2
1
0

Вариант №2

var a,i,n: integer;
begin
  a:=1;readln(n);
  i:=trunc(log2(n)); //получим степень двойки для n
  //если i нечетное,
  //то первое искомое число получаем путем сдвига влево на i-1 в
  //двоичном представлении числа иначе сдвиг на i
  if (i mod 2)=1 then a:=a shl(i-1) else a:=a shl i;
  //далее получаем числа сдвигая вправо на 2 разряда
  //в двоичном представлении числа
  while a>=2 do begin
    write(a,' ');
    a:=a shr 2;
  end;
end.

Тестовое решение:
2147483647
1073741824 268435456 67108864 16777216 4194304 1048576 262144 65536 16384 4096 1024 256 64 16 4
0,0(0 оценок)
Ответ:
СилаЛебедя
СилаЛебедя
18.01.2022 03:12

17.. Установите соответствия между прикладными программами и их назначением

1. Браузер 10. Opera

2. Текстовый редактор 6. Блокнот

3. Графический редактор 4. Paint.NET

4. Редактор видео 3. Movie Maker

5. Издательская система 9. Microsoft Publisher

6. Электронная таблица 2.Microsoft Excel

7. Система управления базами данных 7. Microsoft Access

8. Программа создания презентаций 8. Microsoft Power Paint

9. Почтовая программа 5. Microsoft Outlook

10. Операционная система 1.Microsoft Windows


18.. Информацию, не зависящую от чьего-либо мнения и суждения, называют

1. Объективной

19.. Одно из свойств информации – это

4. Актуальность

20. Растровый графический редактор

2. Paint

21.. Оперативная память служит для

3. хранение исполняемой в данный момент времени программы и данных, с которыми она работает

22.. Служебная программа для проверки и настройки компьютера называется

2. утилита

23.. Объектами авторского права являются (выберите несколько ответов)

3. Программы для компьютеров (включая подготовительные материалы, а также звук, графику и видио, которое получаются с программы)

24.. К текстовым редакторам относятся (выберите несколько ответов)

1. Блокнот

3. Word Pad

5. Open Office Writer

25. К системам управления базами данных относятся

5. Microsoft Access

26..Конфигурация (топология) локальной сети, в которой все рабочие станции соединены с файл-сервером, называется

2. Радиальной (звезда)

27.. Комплекс аппаратных и программных средств, позволяющих компьютерам обмениваться данными

4. Компьютерная сеть

0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота