Форум программистов, компьютерный форум, киберфорум
Наши страницы

Turbo Pascal

Войти
Регистрация
Восстановить пароль
 
RomanCasper
0 / 0 / 0
Регистрация: 14.04.2012
Сообщений: 1
#1

Вывод текста. Помогите пожалуйста исправить программу... - Turbo Pascal

17.04.2012, 15:25. Просмотров 255. Ответов 0
Метки нет (Все метки)

У меня такая проблема, надо написать программу в которой паскаль будет выводить все что написано в текстовом файле, но он у меня выводит только первую строку. Что мне делать подскажите.

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
var f:text;
name,x:string;
begin
   name:='d:\DOC.txt';
   assign(f,name);
   reset(f);
   while not EoF(f) do
   begin
     read(f,x);
     write(x);
   end;
   close(f);
end.
Добавлено через 8 минут
А все, мне больше помощь не нужна, я просто заменил

(read - readln, write - writeln).

Я понял как у меня программа работает и все, в первеом варианте у меня прграмма не переходила на новую строку.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
17.04.2012, 15:25
Здравствуйте! Я подобрал для вас темы с ответами на вопрос Вывод текста. Помогите пожалуйста исправить программу... (Turbo Pascal):

помогите, пожалуйста, исправить ошибку - Pascal
Если задаётся строковая переменная "столбик"-выводить двадцать символов "*" в столбик, "Строка"-двадцать символов "*" в строку program...

Помогите, пожалуйста, исправить ошибки - Pascal
Задача: Диапозон целых положительных чисел задаётся. Выведите два столбика чисел рядом: в одном - чётные числа, в другом - нечётные. uses...

Помогите пожалуйста найти ошибку и исправить. - Turbo Pascal
помогите пожалоста найти ошибку и исправить!!!!!!!!! програма только умнажает последний столбец а остальние нет program Prg7; uses...

Помогите пожалуйста исправить недоработку в коде программы. - Pascal
program Hermite; var i,j,s,n,k,i1,m,j1,i2,j2: integer; b: array of real; x: array of real; var a: array of integer; y: array of...

Помогите исправить программу. - Turbo Pascal
Помогите плиз чото не работает Program Laba_4; Var a,L,S,V: real; ch: char; err :bool;{buleva zminna dla viznachenna nevirnogo...

помогите исправить программу - Turbo Pascal
Нужно было из двух,отсортированных в убывающем порядке массивов получить новый,отсортированный в том же порядке... Program lab_5; ...

0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
17.04.2012, 15:25
Привет! Вот еще темы с ответами:

Помогите исправить программу - Pascal
Найти предел функции с точностью до е f1731.jpg-воть предел... программу ужо делал но преподователь утверждает что неправильно но...

Помогите составить программу пожалуйста.. - Pascal
решение квадратных уравнений.. чтобы можно было задать параметр корней.. ( например больше 2 ) и когда выводил корни.. те которые не...

Помогите пожалуйста найти и исправить ошибку вывода и оператор "and" - Turbo Pascal
Здравствуйте! Помогите пожалуйста найти и исправить ошибку вывода и оператор "and" !!! Не понимаю почему не выводит результат и не работает...

Помогите пожалуйста написать программу пересчёта числа! - Pascal
Разработайте программу пересчёта целого числа в систему исчисления на основании числа K. Результат должен выводиться на экран в виде строки...


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

Или воспользуйтесь поиском по форуму:
1
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.