 Проблема с файлами, вместо цыфр в output файл кидает симвлы |
Правила раздела!
1. Заголовок или название темы должно быть информативным !
2. Все тексты фрагментов программ должны помещаться в теги [code] ... [/code] или [code=pas] ... [/code].
3. Прежде чем задавать вопрос, см. "FAQ" и используйте ПОИСК !
4. НЕ используйте форум для личного общения!
5. Самое главное - это раздел теоретический, т.е. никаких задач и программ (за исключением небольших фрагментов) - для этого есть отдельный раздел!
| denon |
 16.12.2011 0:14
Сообщение
#1
|
|
Группа: Пользователи Сообщений: 2 Пол: Мужской Репутация:  0   |
program lab_1;
var a,b,c,d:integer; K:real; f: file of integer; m: file of real; begin assign(f,'C:\in.txt'); assign(m,'C:\out.txt'); reset(f); read(f,a); read(f,b); read(f,c); read(f,d); K:=(a*b*c)/d; rewrite(m); write(m,K); read; end. в чем проблема ? |
   |
 
|
Сообщений в этой теме
TarasBer m: file of real;
замени на
m: text
потому что ... 16.12.2011 9:19
denon TarasBer , спс
помогло :good: 16.12.2011 20:22  |
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0
|
Текстовая версия | 14.07.2025 1:16 |