Форум программистов, компьютерный форум, киберфорум
Free Pascal
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.52/21: Рейтинг темы: голосов - 21, средняя оценка - 4.52
0 / 0 / 0
Регистрация: 24.03.2015
Сообщений: 6

Ввод/вывод из файла

25.01.2018, 15:03. Показов 4342. Ответов 6
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
При прямом вводе/выводе программа работает, как только через файл так выдает ошибку
Ошибка выполнения #stdin #stdout #stderr 0s 340KB

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
program p;
var n, i, j, a, b: integer;
t:text;
m: array[1..100] of integer;
begin
    assign(t,'input.txt');
    reset(t);
    read(t,n);
    j:=0;
    for i := 1 to n do begin read(t,m[i]);
    end;
    readln(t,a,b);
    close(t);
    for i := 1 to n do begin
    if (m[i]>a) and (m[i]<=b) then j:=j+1;
    end;
    assign (t,'output.txt');
    rewrite(t);
    write(t,j);
    close(t);
end.
0
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
25.01.2018, 15:03
Ответы с готовыми решениями:

Организация меню,обработка массива,его ввод и вывод из файла.
Здравствуйте мудрые форумчане))):)Злющий препод:rtfm: дал лабораторку,над которой я наверно умру(((%-) Задачка не из простых,я как бы не...

Процедура ввод и вывод
На основании данных прайс-листа, содержащего столбцы Наименование товара, Страну изготовитель, Цену, Количество, рассчитать столбец...

ввод вывод данных
помогите доработать программу var t,t1,t2: text ; a,b,c: integer ; begin assign(t , 'a.txt'); reset(t); while not...

6
4 / 4 / 12
Регистрация: 09.01.2018
Сообщений: 22
25.01.2018, 15:54
Проверьте наличие файлов в каталоге с программой.
Проверьте содержимое файла input.txt, оно должно иметь вид:
целое значение n
n чисел
целое значение a
целое значение b

Каждое число должно быть с новой строчки.
0
0 / 0 / 0
Регистрация: 24.03.2015
Сообщений: 6
25.01.2018, 16:09  [ТС]
файл есть
содержимое такое:
5
6 2 1 8 3
3 6
0
4 / 4 / 12
Регистрация: 09.01.2018
Сообщений: 22
25.01.2018, 16:37
Программа с такими данными запускается нормально. Может быть, повреждена одна из библиотек FP, отвечающая за автоперенаправление ввода-вывода.
0
0 / 0 / 0
Регистрация: 24.03.2015
Сообщений: 6
25.01.2018, 17:00  [ТС]
Что сделать?
0
Эксперт Pascal/Delphi
2388 / 1300 / 1492
Регистрация: 29.08.2014
Сообщений: 4,665
26.01.2018, 09:33
Цитата Сообщение от Zyn Посмотреть сообщение
Ошибка выполнения #stdin #stdout #stderr
не помню я во free pascal такой ошибки.

Добавлено через 14 секунд
точно на FPC проверяете?
0
Модератор
Эксперт Pascal/DelphiЭксперт NIX
 Аватар для bormant
7816 / 4635 / 2837
Регистрация: 22.11.2013
Сообщений: 13,158
Записей в блоге: 1
27.01.2018, 15:12
Это почти наверняка какой-то проверочный сайт, соответственно и смотреть нужно его условия. Скорее всего, ожидается ввод со стандартного ввода и вывод на стандартный вывод.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
27.01.2018, 15:12
Помогаю со студенческими работами здесь

файловый ввод- вывод
Напишите программу которая записывает в текстовый файл массив значений функции(у) (смотрите ниже*) на интервале от 4 до 12 с шагом 2 а...

Ввод/вывод матрицы
помогите с куском программы. введение кол-ва столбцов матрицы, введение кол-ва строк матрицы, введение каждого элемента матрицы. ...

ввод и вывод данных
А. создайте программу, которая запрашивает данные и сохраняет их в файле. Б. Создайте программу, которая считывает информацию из файла и...

Файловый Ввод-Вывод
В качестве исходного текста использовать массив (предварительно напечатанный в блокноте) ; обработать его (программа ниже) ; затем...

Ввод\вывод Паскаль
помогите с заданием: Вычислить, какая идет секунда суток при положении стрелок в h часов, m минут и s секунд, а также угол (в градусах)...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
7
Ответ Создать тему
Новые блоги и статьи
SDL3 для Web (WebAssembly): Реализация движения на Box2D v3 - трение и коллизии с повёрнутыми стенами
8Observer8 20.02.2026
Содержание блога Box2D позволяет легко создать главного героя, который не проходит сквозь стены и перемещается с заданным трением о препятствия, которые можно располагать под углом, как верхнее. . .
Конвертировать закладки radiotray-ng в m3u-плейлист
damix 19.02.2026
Это можно сделать скриптом для PowerShell. Использование . \СonvertRadiotrayToM3U. ps1 <path_to_bookmarks. json> Рядом с файлом bookmarks. json появится файл bookmarks. m3u с результатом. # Check if. . .
Семь CDC на одном интерфейсе: 5 U[S]ARTов, 1 CAN и 1 SSI
Eddy_Em 18.02.2026
Постепенно допиливаю свою "многоинтерфейсную плату". Выглядит вот так: https:/ / www. cyberforum. ru/ blog_attachment. php?attachmentid=11617&stc=1&d=1771445347 Основана на STM32F303RBT6. На борту пять. . .
Камера Toupcam IUA500KMA
Eddy_Em 12.02.2026
Т. к. у всяких "хикроботов" слишком уж мелкий пиксель, для подсмотра в ESPriF они вообще плохо годятся: уже 14 величину можно рассмотреть еле-еле лишь на экспозициях под 3 секунды (а то и больше),. . .
И ясному Солнцу
zbw 12.02.2026
И ясному Солнцу, и светлой Луне. В мире покоя нет и люди не могут жить в тишине. А жить им немного лет.
«Знание-Сила»
zbw 12.02.2026
«Знание-Сила» «Время-Деньги» «Деньги -Пуля»
SDL3 для Web (WebAssembly): Подключение Box2D v3, физика и отрисовка коллайдеров
8Observer8 12.02.2026
Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами и вызывать обработчики событий столкновения. . . .
SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL_LoadPNG (без SDL3_image)
8Observer8 11.02.2026
Содержание блога Библиотека SDL3 содержит встроенные инструменты для базовой работы с изображениями - без использования библиотеки SDL3_image. Пошагово создадим проект для загрузки изображения. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru