В текстовом файле записаны вещественные числа в форме с фиксированной точкой. Преобразовать файл, представив каждое число в форме с плавающей точкой, сохранив две цифры после точки в мантиссе.В паскале через процедуры

12 Янв 2020 в 19:41
129 +1
1
Ответы
1
program ConvertFixedToPointFloating;
var
inputFile, outputFile: text;
number: real;
procedure ConvertFixedToPointFloating(inputFileName, outputFileName: string);
var
inputFile, outputFile: text;
number: real;
begin
assign(inputFile, inputFileName);
reset(inputFile);
assign(outputFile, outputFileName);
rewrite(outputFile);
while not eof(inputFile) do
begin
readln(inputFile, number);
writeln(outputFile, format('%0.2f', [number]));
end;
close(inputFile);
close(outputFile);
end;
begin
ConvertFixedToPointFloating('input.txt', 'output.txt');
end.
18 Апр 2024 в 20:36
Не можешь разобраться в этой теме?
Обратись за помощью к экспертам
Гарантированные бесплатные доработки в течение 1 года
Быстрое выполнение от 2 часов
Проверка работы на плагиат
Поможем написать учебную работу
Прямой эфир