написать программу, которая считает погрешность при переводе дробного числа из 10чной в 2ичную систему счисления

[anna_bleak]

Мне нужно написать программу, которая считает погрешность, при переводе дробного числа из 10чной в 2ичную систему счисления, я не ушла дальше алгоритма действий(за несколько дней)
1. ввод дробного числа;
2. перевод в 2ичную систему счисления;
3. потом обратно в 10ичную;
4. отнимаем получение число от исходного;
5. выводим.
как бы ничего сложного, но что делать с дробными числами понятия не имею :с

[digitalis]

Задача бессмысленная, как и большинство задаваемых студентам задач.
Погрешность зависит от
- платформы, на которой выполняется действие ( ПК? микроконтроллерная система ? БЭСМ-2 ? арифмометр "Феликс" ?)
- языка программирования
- типа выбранных переменных ( real ? double? extended? )
Форма хранения и обработки данных в Intel-совместимых ПК двоичная, в отличие, скажем, от IBM-360, где предусмотрены и команды десятичной арифметики. Так что когда выполняем подпрограмму ввода scanf ("%lf", &a), данные попадают в переменную 'а' уже в двоичном виде, раскроенные на знак-мантиссу-порядок, и ничего никуда преобразовывать не надо.
Обратное преобразование в десятичный вид, точнее, его символьное представление, даст подпрограмма вывода printf ( Это все на Си) . Можно, конечно, взять внутреннее представление числа, обработать его специально написанной программой для работы с ооочень длинными мантиссами - и тогда оценим погрешность. Но это - задача отнюдь не для зеленых студентов.

Сообщение от anna_bleak

но что делать с дробными числами понятия не имею :с

так сама же и написала программу действий из 5 пунктов, только п.2 и п.3 выбрасываем ввиду их бессмысленности.

var
  Form1: TForm1  ;
  a : single ; x,y : extended ;
implementation

{$R *.dfm}


procedure TForm1.FormClick(Sender: TObject);
begin
   a := 1.0/3.0 ; x := 1.0/3.0 ; y := x-a ;
   Memo1.Lines.Add ( Format ('%16.12f  %16.12f',[x,y]) )
end ;
end.

Имеем результат : 1/3 = 0,333333333333 , абс. погрешность = -0,000000009934