Правила форума :: Скачать Pascal :: FAQ // Ада–2020 :: Скачать GNAT :: OEM–2015 :: Ada -> C/C++
Прочтите прежде чем задавать вопрос!1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code], либо быть опубликованы на нашем PasteBin в режиме вечного хранения.
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!
| Файл |
| die |
Сообщение
#1
|
 Новичок  Группа: Пользователи Сообщений: 32 Пол: Мужской Реальное имя: Макс Репутация:  0   |
Помогите пожалуйста решить , завтра нужно уже сдать .
Записать в файл f последовательную доступа N натуральных чисел.Получить в другом файле последовательного доступа все компоненты файла f, кроме тех , которые кратны K . Вывести полученный файл на печать . |
   |
 
|
  |
| die |
Сообщение
#2
|
|
Новичок Группа: Пользователи Сообщений: 32 Пол: Мужской Реальное имя: Макс Репутация: 0 |
спасибо за помощь ... но у меня ошибка file not found .
|
|
|
|
| sheka |
Сообщение
#3
|
 Я. Группа: Пользователи Сообщений: 809 Пол: Мужской Реальное имя: Саша Репутация: 11 |
Цитата(die @ 8.06.2009 13:20)  file not found . было assign (f1,' number.txt'); надо assign (f1,'number.txt'); имя файла начиналось с пробела. |
|
|
|
die Файл 7.06.2009 14:35
Ozzя А в чем проблема-то? :blink:
Не знаете как писат… 8.06.2009 11:56
die
А в чем проблема-то? :blink:
Не знаете как писа… 8.06.2009 15:45 sheka а как выводить на печать? 8.06.2009 15:32 Гость
а как выводить на печать?
не знаю как оформить к… 8.06.2009 15:44 Ozzя
На принтер?
uses
printer;
...
writeln(lst,… 8.06.2009 15:44 Ozzя
...
read(f1,num);
if num mod K<>0 the… 8.06.2009 15:46 die
...
read(f1,num);
if num mod K<>0 the… 8.06.2009 16:06 sheka ничего не понятно, а зачем 2 части? и файлы же пос… 8.06.2009 16:43 die
было assign (f1,' number.txt');
надо assi… 8.06.2009 19:00 |
|
Текстовая версия | 19.04.2024 16:55 |
