hotnuts

17.10.2021

составить программу на Pascal, которая запрашивает возраст человека, если ему 18 и больше сообщает "Замечательно, вы уже можете водить водить автомобиль", в противном случае "К сожалению вам ещё рановато водить автомобиль"

Информатика

Ответить

Ответы

vladimir152

17.10.2021

У вас есть число 137
если вам надо перевести его в какую-нибудь систему счисления, то нужно делить это число на номер системы, так если нужно перевести число 137 в ДВОичную ,то делим на 2 до тех пор, пока остатотк от деления не равен 1.(если в ТРОичную то на 3 и т.д.).
начнём:
137 / 2 = 68 выписываем остаток (1)
68   / 2 = 34 выписываем остаток (0)
34   / 2 = 17 выписываем остаток (0)
17   / 2 = 8   выписываем остаток (1)
8 / 2 = 4 выписываем остаток (0)
4   / 2 = 2   выписываем остаток (0)
2 / 2 = 1 <==   на этой единице заканчиваем деление, далее снизу вверх выписываем получившееся число : 001001;
ответ: 001001

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

составить программу на Pascal, которая запрашивает возраст человека, если ему 18 и больше сообщает "Замечательно, вы уже можете водить водить автомобиль", в противном случае "К сожалению вам ещё рановато водить автомобиль"

▲

Ответы

Ответить на вопрос

Ваше имя (никнейм)*

Email*

Комментарий*

Популярные вопросы в разделе

По питону! 20 дан массив из 20ти вещественных чисел. вывести на экран только те числа, которые не равны нулю

Вычислите значения выражений на языке помагите

1) Составить логическое выражение по схеме:

Заполни пропуски в программе. вывод на экран кубов чисел от 11 до 4. var : integer; begin for i: = downto do writeln (iii); readln; end. 2)дано: fori: =1to23do i изменяется от до с шагом 3)з...

1.построить таблицу истинности для логического выражения X=(a+b)•(a~+b~)+a•b~ если что сверху это типо палочки

Под строкой меню не находится строка состояния Стандартная панель инструментов панель Форматирования

Сколько байт информации несет каждое трехзначное число? нужно решение, а не просто ответ

2 Дано действительное число а. Вычислить f(a), если 0 при x<=0, { x²-x при 0 x²-sin πx² в остальных случаях и с блок схемой

Переведите из десятичной системы счисление следующие числа: 0, 025 → а(2 внизу рядом с а) 0, 0625 → а(16 внизу рядом с а) 0, 0625 → а(8 снизу рядом с а)

Ответы

Ответить на вопрос

Ваше имя (никнейм)*

Email*

Комментарий*

Популярные вопросы в разделе

По питону! 20 дан массив из 20ти вещественных чисел. вывести на экран только те числа, которые не равны нулю​

Вычислите значения выражений на языке помагите

1) Составить логическое выражение по схеме:

Заполни пропуски в программе. вывод на экран кубов чисел от 11 до 4. var : integer; begin for i: = downto do writeln (i*i*i); readln; end. 2)дано: fori: =1to23do i изменяется от до с шагом 3)з...

1.построить таблицу истинности для логического выражения X=(a+b)•(a~+b~)+a•b~ если что сверху это типо палочки ​

Под строкой меню не находится строка состояния Стандартная панель инструментов панель Форматирования

Сколько байт информации несет каждое трехзначное число? нужно решение, а не просто ответ

2 Дано действительное число а. Вычислить f(a), если 0 при x&lt;=0, { x²-x при 0 x²-sin πx² в остальных случаях и с блок схемой

Переведите из десятичной системы счисление следующие числа: 0, 025 → а(2 внизу рядом с а) 0, 0625 → а(16 внизу рядом с а) 0, 0625 → а(8 снизу рядом с а)

По питону! 20 дан массив из 20ти вещественных чисел. вывести на экран только те числа, которые не равны нулю

Заполни пропуски в программе. вывод на экран кубов чисел от 11 до 4. var : integer; begin for i: = downto do writeln (iii); readln; end. 2)дано: fori: =1to23do i изменяется от до с шагом 3)з...

1.построить таблицу истинности для логического выражения X=(a+b)•(a~+b~)+a•b~ если что сверху это типо палочки

2 Дано действительное число а. Вычислить f(a), если 0 при x<=0, { x²-x при 0 x²-sin πx² в остальных случаях и с блок схемой