Правила форума :: Скачать Pascal :: FAQ // Ада–2020 :: Скачать GNAT :: OEM–2015 :: Ada -> C/C++
Прочтите прежде чем задавать вопрос!1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code], либо быть опубликованы на нашем PasteBin в режиме вечного хранения.
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!
| Литерный тип данных), Помогите)) |
| Cheburashka |
Сообщение
#1
|
 Бывалый  Группа: Пользователи Сообщений: 195 Пол: Мужской Реальное имя: Сергей Репутация:  2   |
В общем у меня возникла проблема с литерным типом((
В общем я хочу считать два числа к примеру 5 10. Но они записаны в файле, и записаны следующим образом: 5 10 И вот когда я считываю первое число (Read (ch);), то оно отлично сохраняется, а вот ко второму числу я никак нимагу перейти(( Разъясните мне пожалуйста, как это сделать! Сообщение отредактировано: Сергей Меркурьев - -------------------- ♣♣♣
"Себя великим не считай, гордясь величьем предков, Величья не добудешь ты и золота ценою! Хоть светит на небе луна, но отраженным светом - Чужою славой не живи, не будь второй луною!!!" ♣♣♣ |
   |
 
|
Сергей Меркурьев Литерный тип данных) 5.06.2009 20:52
volvo Читать с переводом строки:
ReadLn(f, n1); Readln(f… 5.06.2009 20:58 Сергей Меркурьев Это то да, а я вот считываю посимвольно каждую циф… 5.06.2009 20:59
sheka
Это то да, а я вот считываю посимвольно каждую ци… 5.06.2009 21:01 volvo Значит делай:
while not eoln(f) do
read(f, ch);
… 5.06.2009 21:02 Lapp проблема с литерным типом((
В общем я хочу считать… 5.06.2009 21:02 Сергей Меркурьев В общем я вам сейчас дам этот кусок программы, а В… 5.06.2009 21:03 volvo Я ж написал тебе - переведи строку: ReadLn, иначе … 5.06.2009 21:06 Сергей Меркурьев ...
A:=0;
Read(ch);
While ch in ['0… 5.06.2009 21:08 volvo Вот понимаешь, в чем дело? У меня - не считывает..… 5.06.2009 21:32 Сергей Меркурьев Какой конец строки?
В общем вот программа:
Program… 5.06.2009 21:41 Lapp Сереж, а зачем так сложно?
Нельзя просто считать в… 5.06.2009 21:58 Сергей Меркурьев Ну в принципе можно и строкой)) Но меня учителя по… 5.06.2009 22:04 volvo Ну, у меня вот так отработало:
A[0]:=0;
Read… 5.06.2009 22:14 Lapp но печататься у тебя ничего не будет, все символы,… 5.06.2009 22:19 volvo :ypriamii: Забыл про перенаправление... В файл же … 5.06.2009 22:25 Сергей Меркурьев Разъясните что такое TP (turbo pascal?) и FP?
Доб… 5.06.2009 22:26 Lapp Разъясните что такое TP (turbo pascal?) и FP?Да, а… 5.06.2009 22:34 Сергей Меркурьев Ах, ну да я догадывался) Спасибо. 5.06.2009 22:51  |
|
Текстовая версия | 19.04.2024 16:28 |
