сервис вопросов и ответовНаписать программу на Free Pascal которая переводит число из десятичной системы в двоичную
10-11 класс|
|
Anton3135422
04 дек. 2014 г., 2:03:06 (9 лет назад)
солоха
04 дек. 2014 г., 3:59:46 (9 лет назад)
function ToBinaryString(x: integer): string;
var r, s: string;
begin
if x < 0 then begin
s := '-';
x := -x;
end;
while x <> 0 do begin
r := Chr((x and 1) or 48) + r;
x := x shr 1;
end;
ToBinaryString := s + r;
end;
var x: integer;
begin
readln(x);
writeln(ToBinaryString(x));
end.
Ответить
Другие вопросы из категории
Pascal.
Даны массивы A(m) и Y(m), m≤16 . Найти сумму S : S=A1Ym+A2Ym-1+...+AmY1 . Если S<24 вывести ее на печать, в противном случае вывести на печать оба исходных массива.
ЭТО СРОЧНО ПОМОГИТЕ
Напишите программу, которая ответит на вопрос:
Является ли треугольник со сторонами a, b, c равносторонним?
Является ли треугольник со сторонами a, b, c равнобедренным?
Существует ли треугольник со сторонами a, b, c?
Лежит ли точка с координатами a и b в первой координатной четверти?
Являются ли заданные числа b и c квадратом и кубом числа a?
ТРЕБОВАНИЯ:
Программа вводит три вещественных числа и выводит пять строк с ответами на каждый из вопросов 1-5.
ИМЯ ФАЙЛА С ПРОГРАММОЙ = ВАШЕЙ ФАМИЛИИ
Читайте также
Программа 4. Пользователь вводит угол . Написать программу, доказывающую основное тригонометрическое тождество. Программа 5. Пользователь вводит
число рядов. Написать программу подсчета мест в кинотеатре «Оскар», в соответствии со схемой кинотеатра, представленной ниже. На экран вывести итоговое количество мест.(вложение - 1 рисунок)
Программа 6. Найти значение выражения для вводимых с клавиатуры А, В и С. при А=4, В=2, С=5.(вложение - формула)
Программа 7. Написать программу, вычисляющую значения логического выражения . На экран вывести это значение.
Программа 8. Пользователь вводит число 0,515625. Написать программу, которая в точности повторяет алгоритм перевода данного числа из десятичной системы счисления в четверичную. На экран вывести окончательный результат.
написать программу на Assembler
добрый вечер, всем. помогите, пожалуйста, написать программу на Ассемблере.
задание:
Создать программу на языке Ассемблер, что позволяет организовать вычисления над элементами массивов
Объединить два массива 8-битных целых чисел со знаком. Сначала элементы второго затем первого.
заранее огромное спасибо всем!
Помогите пожалуйста написать программу в паскале.
Составить программу перевода натурального числа из десятичной системы счисления в двоичную
Вы находитесь на странице вопроса "Написать программу на Free Pascal которая переводит число из десятичной системы в двоичную", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.