Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Программирование [игнор отключен] [закрыт для гостей] / Программа связанная с файлом на турбо прологе, помогите! / 2 сообщений из 2, страница 1 из 1
30.03.2012, 11:56
    #37731092
grifonsees
grifonsees
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Программа связанная с файлом на турбо прологе, помогите!
Мне нужно разработать программу, вычисляющую количество чисел, меньших среднего арифметического значения всех чисел в файле. У меня некак не получается это сделать(((. Помогите!!!

Модератор: Я же попросил показать Ваши наработки. Где код, который "не получается"?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
30.03.2012, 12:57
    #37731240
grifonsees
grifonsees
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Программа связанная с файлом на турбо прологе, помогите!
Вот код программы которая считывает элементы из файла и выводит их на экран:

Код: html
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
28.
29.
DOMAINS
file = f
PREDICATES
write_file(file)
writeFile(string)
CLAUSES
write_file(f):-
          not(eof(f)),!,
          readchar(C),
          write(C," "),
          write_file(f).
write_file(_).
writeFile(F_N):-
          existfile(F_N),!,
          openread(f,F_N),
          readdevice(f),
          write_file(f),
          closefile(f),
          readdevice(keyboard),
          nl,nl,
          write("нажмите на любую клавишу"), 
                       
          readchar(_).
writeFile(F_N):-
          write("файла с имянем ",F_N," не найдено!").                        
GOAL 
write("введите имя файла: "),
readln(F_N),
writeFile(F_N).



не как немогу сделать так чтобы она вычисляла количество чисел, меньших среднего арифметического значения всех чисел, помогите переделать!:(
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Программирование [игнор отключен] [закрыт для гостей] / Программа связанная с файлом на турбо прологе, помогите! / 2 сообщений из 2, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 452ms
Закрыть
start [/forum/topic.php?fid=16&mobile=1&tid=1342336]:
 0ms
get settings:
 6ms
get forum list:
 14ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 176ms
get topic data:
 9ms
get forum data:
 2ms
get page messages:
 30ms
get tp. blocked users:
 1ms
others: 208ms
total:  452ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]