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. // Конец программы
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. Запиши все остатки начиная снизу, начни с результата последнего деления. остальные результаты писать в ответ не нужно.