IPB
ЛогинПароль:

> Прочтите прежде чем задавать вопрос!

1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code], либо быть опубликованы на нашем PasteBin в режиме вечного хранения.
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!

 
 Ответить  Открыть новую тему 
> задача с файлами, помогите разобраться
сообщение
Сообщение #1


Новичок
*

Группа: Пользователи
Сообщений: 11
Пол: Мужской

Репутация: -  0  +


есть задание:
Задание3. В текстовом файле содержится последовательность действительных чисел. Из заданной последовательности получить последовательность логических констант со значениями True для положительных и False для отрицательных чисел. Полученную последовательность записать в результирующий файл. Имена исходного и результирующего файлов вводятся с клавиатуры.
program zadacha3;
var
f,res: text;
i: integer;
filename: string;

begin
writeln('имя исходного файла');
readln(filename);
assign(f,filename);
writeln('имя результирующего файла');
readln(filename);
assign(res,filename);
{$I-}
reset(f);
{$I+}
if IOResult<>0 then
exit;
rewrite(res);
while not eof(f) do
begin
readln(f,i);
writeln(res,i>0);
end;
close(f);
close(res);
end.


если ввожу в исходный файл только положительные числа, в результирующем пишет - True. Если только отрицательные - False. А если и те и другие, то тоже False. Это по-моему заданию не совсем соответствует. Может кто что подскажет?
М
Теги... мисс_граффити



Сообщение отредактировано: мисс_граффити -
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #2


Помощник капитана
****

Группа: Пользователи
Сообщений: 601
Пол: Мужской
Реальное имя: Артем

Репутация: -  2  +


Не,почему,у меня вроде все пишет..
Допустим:
12
34
-7
-10
55
66
Пишет
TRUE
TRUE
FALSE
FALSE
TRUE
TRUE

А как должно быть еще?


--------------------
Dum spiro spero!
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #3


Новичок
*

Группа: Пользователи
Сообщений: 14
Пол: Мужской

Репутация: -  0  +


А как быть с такой задачей : Дана последовательность действительных чисел в текстовом файле. Найти их среднее значение отбросив предварительно мин и макс и результат записать а новый текстовый файл.
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #4


Гость






Поиском пользуйся... Решение задачи (вернее, его алгоритм) уже было на форуме. Это делается за один проход по файлу...
 К началу страницы 
+ Ответить 
сообщение
Сообщение #5


просто человек
******

Группа: Пользователи
Сообщений: 3 641
Пол: Женский
Реальное имя: Юлия

Репутация: -  55  +


ну и зачем задавать свой вопрос в чужой теме???


--------------------
Все содержимое данного сообщения (кроме цитат) является моим личным скромным мнением и на статус истины в высшей инстанции не претендует.
На вопросы по программированию, физике, математике и т.д. в аське и личке не отвечаю. Даже "один-единственный раз" в виде исключения!
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 

 Ответить  Открыть новую тему 
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 





- Текстовая версия 27.09.2020 11:31
500Gb HDD, 6Gb RAM, 2 Cores, 7 EUR в месяц — такие хостинги правда бывают
Связь с администрацией: bu_gen в домене octagram.name