Как перевести число из вещественного вида в десятичный?

Из коментариев я понял, что у вас проблема вывода результата в задаче.
Если число описано как целое, то оно в паскале выводится нормально, если как real то оно выводится в виде
а * 10 в степени е, например 0.2 выведится в виде 2.0000000000Е-001, т. е. 2 * 10 в степени -1, чтобы это же число вывести нормально надо отформатировать ввод. например в переменной а лежит число 0.2, чтобы оно вывелось как 0.2 надо написать writeln(a:2:2); это мы задали показать 2 знака перед запятой и 2 знака после запятой, пример с выводом данных ниже.

program b;
var
a : real;
begin
a := 0.2;
writeln(a);
writeln('Этоже число после форматирования. ');
writeln(a:2:2);
readln;
end.

Налицо смешение понятий.
Система счисления :
Двоичная, восьмеричная, шестнадцеричная, десятичная, двадцатеричная и т. д.
и собственно чисел:
Целые, рациональные, иррациональные, вещественные, комплексные, кватернионы и т. д.
А собственно алгоритм перевода зависит от того как закодировано то или иное число. Задача сводится к перекодировке. В любом языке высокого уровня полно встроенных функций для этого.

Что за десятичный тип числа?? ? Если нужно перевеси из вещественного в целый, то по идее нужно округлять... Или взять от него целую часть, в зависимости что нужно в задаче.. . Для языка паскаль округлить это операция Round(x); взять целую часть Trunc(x);

напиши, какое число ты называешь вещественным, и какое десятичным. Пример

тупо округлить