1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code], либо быть опубликованы на нашем PasteBin в режиме вечного хранения.
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!
| Tan |
Сообщение
#1
|
![]() Профи ![]() ![]() ![]() ![]() Группа: Пользователи Сообщений: 559 Пол: Мужской Реальное имя: Бруно Репутация: 10 |
1. Забавное задание, в чём его смысл ?
2. Именно если ввести то просто посимвольно считываешь и потом можно скинуть в массив чаров и вывести. -------------------- Цитата Imagination is more important than knowledge. Albert Einstein |
![]() ![]() |
| tchib |
Сообщение
#2
|
|
Группа: Пользователи Сообщений: 2 Пол: Мужской Репутация: 0 |
На сколько я знаю, максимальная длина строки 255 символов, поэтому, как ни крути, сделать ее такой невозможно. Значит остается только массив из символов длинной 1100 элементов.
Поскольку CRT использовать нельзя, то остается только read. В цикле вводим каждый символ и все... Цитата в Паскале имеет буфер, как и всё на свете имеюший определённые границы... так что понапрасну не трудись-лучше работать с файлом этот буффер и есть файл, причем текстовый, и процедура read без указания файловой переменной читает из файла input.txt, хотя на счет разширения точно сказать не могу. |
| Malice |
Сообщение
#3
|
![]() Профи ![]() ![]() ![]() ![]() Группа: Пользователи Сообщений: 705 Пол: Мужской Репутация: 20 |
Поскольку CRT использовать нельзя, то остается только read. В цикле вводим каждый символ и все... Не получится.. Первый же Read(c:char) будет вводить в буфер всю строку и ждать enter-a. После энтера прочитается в "c" первый символ этой строки, следующие read-ы будут брать символы из буфера. Т.к. длина буфера ограничена (127 символов) - длина строки будет таже. |
Tan Ввод длинной строки с клавиатуры 11.04.2007 17:00
Perfez Если я не ошибаюсь, такое громадище с клавиатуры т… 11.04.2007 17:01
volvo Кто-то запрещает работать с PChar и посимвольным в… 11.04.2007 17:47
anchik
1. Забавное задание, в чём его смысл ?
2. Именно … 11.04.2007 19:00
Tan
sum:=0;
repeat
ch:=readkey;
inc (sum);
until (o… 11.04.2007 19:05
Malice Можно приспособить вот такой вариант:
{$m 102… 12.04.2007 0:45

Гость
Можно приспособить вот такой вариант:
{$m 10… 14.04.2007 23:52

Malice Делай тогда как Tan показал, readkey сделай сам с… 15.04.2007 2:27
anchik
[code=pas]
sum:=0;
repeat
ch:=readkey;
inc (sum… 12.04.2007 1:13
tchib так я и не говорю вводить всю строку. Можно просто… 15.04.2007 14:02![]() ![]() |
|
Текстовая версия | 8.11.2025 18:27 |