|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
|
Опции темы | Поиск в этой теме |
22.05.2010, 13:21 | #1 |
Пользователь
Регистрация: 06.05.2010
Сообщений: 72
|
Ошибка в программе.
Помогите пожалуйста найти ошибку. Не создается файл. И соответственно нет вывода данных. Задание такое:
Напишите программу в ИСР Pascal для создания массива из 10 элементов типа запись (ввод полей осуществляется с клавиатуры). Запись для каждого студента должна содержать следующие поля: номер по порядку, фамилия, имя, группа, оценка. Эти данные нужно программным образом записать в текстовый файл, а затем осуществить чтение и форматный вывод информации из этого файла на экран. Код:
|
22.05.2010, 13:48 | #2 |
C++, Java
Старожил
Регистрация: 10.04.2010
Сообщений: 2,665
|
чтобы создать файл, нужно написать:
Код:
|
22.05.2010, 13:54 | #3 |
ТАМБОВСКИЙ ВОЛК.
Участник клуба
Регистрация: 16.03.2010
Сообщений: 1,354
|
да ток для начала массив надо создать.
にんじゃ
|
22.05.2010, 16:02 | #4 |
Пользователь
Регистрация: 06.05.2010
Сообщений: 72
|
а можно подробней. Куда этот кусок кода вставить. И для чего нужен массив?
|
22.05.2010, 18:34 | #5 |
Пользователь
Регистрация: 06.05.2010
Сообщений: 72
|
такие ошибки выходят. В чем у меня проблемма не подскажете?
Compiling '5_2_5.D98165B6'... [Pascal Error] 5_2_5.D98165B6(1): E202 identifier (name) expected [Pascal Error] 5_2_5.D98165B6(4): E415 type name or integer/char constant expected, 'byte' found [Pascal Error] 5_2_5.D98165B6(7): E415 type name or integer/char constant expected, 'text' found [Pascal Error] 5_2_5.D98165B6(10): E428 identifier 'assign' is not procedure, function, variable or unit name Done - 4 error(s), 0 warning(s) |
22.05.2010, 20:56 | #6 |
Пользователь
Регистрация: 04.11.2009
Сообщений: 17
|
Поздно, наверное, хотя отпишись
Type stu=record
Surname, name,gruppa,ozenka:string; x1,x2,x3:byte; A:real; End; Var f:file of stu; friends: array [1..100] of stu; z:stu; i,b,d,n:integer; begin assign(f,'f.text'); rewrite(f); d:=0; b:=0; for i:=1 to 10 do begin writeln('surname:'); readln(friends[i].surname ); writeln('gruppa'); readln(friends[i].gruppa); writeln('ocenki:'); readln(friends[i].ozenka); end; close(f); reset(f); while not Eof(F) do begin read(f,friends[n]);end; for i:=1 to 10 do begin writeln('cтудент-',friends[i].surname,'-группа-',friends[i].gruppa,'-оценки-',friends[i].ozenka); end; close(f) end. |
22.05.2010, 20:56 | #7 |
Пользователь
Регистрация: 04.11.2009
Сообщений: 17
|
Поздно, наверное, хотя бы отпишись
Type stu=record
Surname, name,gruppa,ozenka:string; x1,x2,x3:byte; A:real; End; Var f:file of stu; friends: array [1..100] of stu; z:stu; i,b,d,n:integer; begin assign(f,'f.text'); rewrite(f); d:=0; b:=0; for i:=1 to 10 do begin writeln('surname:'); readln(friends[i].surname ); writeln('gruppa'); readln(friends[i].gruppa); writeln('ocenki:'); readln(friends[i].ozenka); end; close(f); reset(f); while not Eof(F) do begin read(f,friends[n]);end; for i:=1 to 10 do begin writeln('cтудент-',friends[i].surname,'-группа-',friends[i].gruppa,'-оценки-',friends[i].ozenka); end; close(f) end. |
22.05.2010, 21:01 | #8 |
ТАМБОВСКИЙ ВОЛК.
Участник клуба
Регистрация: 16.03.2010
Сообщений: 1,354
|
ilyas22 Эти данные нужно программным образом записать в текстовый файлЕсли имеется ввиду именно текстовые файлы а не типизированные.
にんじゃ
|
23.05.2010, 16:35 | #9 |
Пользователь
Регистрация: 06.05.2010
Сообщений: 72
|
Те же ошибки выскакивают, что и выше.
Спасибо за исправленный код. Скажите пожалуйста, это у меня с компилятором что то да? программа должна работать, а ошибки выскакивают. Кто нибудь может проверить на своем? пожалуйста сообщите. Буду качать тогда новый.
|
23.05.2010, 21:50 | #10 |
Пользователь
Регистрация: 06.05.2010
Сообщений: 72
|
Срочно
Советы будут? Я не пойму либо паскаль у меня слетел либо в проге ошибка. подскажите пожалуйста.
|
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Ошибка в программе | forman | Общие вопросы C/C++ | 1 | 18.05.2010 22:47 |
Ошибка в программе | larin1974 | Помощь студентам | 7 | 06.03.2010 20:44 |
Ошибка в программе на С++ | Vikelf | Помощь студентам | 3 | 15.05.2009 15:05 |
С++ Ошибка в программе | EwwwA | Общие вопросы C/C++ | 5 | 05.01.2009 23:12 |