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

Составить программу, печатающую числа в диапазоне от 45 до 369, которые не делятся на 6, но оканчиваются на цифру 6. нужно составить в pascal'e. нужно

Показать ответ
Ответ:
nastya2734
nastya2734
19.02.2020 13:17

46/2=23 остаток 0

23/2 = 11 остаток 1

11/2 = 5 остаток 1

5/2 = 2 остаток 1

2/2 = 1 остаток 0

Запишем остатки снизу вверх учитывая единицу, которую мы получили при делении 2 на 2: 101110

Для перевода числа из десятичной СС в двоичную нужно:

1. Выполнить деление этого числа и если его результат будет равен или больше 2, то выполнить деление этого результата. Обязательно запиши остаток от каждого деления.

2. Запиши все остатки начиная снизу, начни с результата последнего деления. остальные результаты писать в ответ не нужно.

0,0(0 оценок)
Ответ:
книга67
книга67
05.04.2022 00:41

program Primer;  // Название программы

var  // Раздел для описания переменных

 a, b, max: integer;  // Объявление целочисленных переменных:

a - хранение первого введенного с клавиатуры числа;b - хранение второго введенного с клавиатуры числа;max - хранение максимального из них.

begin  // Начало программы

 writeln('Введите два целых числа:');  // Вывод сообщения в консоль формата:

Введите два целых числа:

 read(a, b);  // Считываем с клавиатуры два числа

 if a > b then // Если значение переменной a > b, тогда

 begin  // Начало цикла if

   max := a;  // В переменную max присваиваем значение переменной a

 end  // Конец цикла if

 else // Иначе

 begin  // Начало цикла else

   max := b;  // В переменную max присваиваем значение переменной b

 end;  // Конец цикла else

 writeln('Наибольшее число: ', max);  // Вывод сообщения в консоль формата:

Наибольшее число: *значение переменной max*

end. // Конец программы

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