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

Составь программу к задачам

👇
Открыть все ответы
Ответ:
rom4il
rom4il
10.01.2023
Вариант №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
4,5(60 оценок)
Ответ:
zoziev2014
zoziev2014
10.01.2023

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. Компьютерная сеть

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