Версия для печати темы

Нажмите сюда для просмотра этой темы в обычном формате

Форум «Всё о Паскале» _ Задачи _ Работа с файлом

Автор: -=АнЮтА=- 19.12.2006 17:09

Имеется типизированный файл вещественных чисел file of real
Открываю его на запись функцией rewrite(f);
и начинаю запись:
write (f,a:2:2);
Этим я хочу обрезать вещественное число до двух знаков, очевидно нельзя так записывать в файл, как тогда сделать,чтоб число вещественное, которое хранится в компьютере можно было сравнить с числом, введенным с клавиатуры.Через trunc все равно представляется в "машинном" виде. Подскажите, как можно сделать?

Автор: klem4 19.12.2006 17:17

Ну записать число с нужной точностью в файл можно например так: (первое что в голову приходит)


a := 3.14159;
Str(a:2:2, s);
Val(s, a, e);
write(f, a);

Автор: -=АнЮтА=- 19.12.2006 17:32


спасибо, а я еще придумала,можно ведь через точность два числа сравнить, тогда не важно будет как оно записано в файле. give_rose.gif