IPB
ЛогинПароль:

> Правила раздела!

1. Заголовок или название темы должно быть информативным !
2. Все тексты фрагментов программ должны помещаться в теги [code] ... [/code] или [code=pas] ... [/code].
3. Прежде чем задавать вопрос, см. "FAQ" и используйте ПОИСК !
4. НЕ используйте форум для личного общения!
5. Самое главное - это раздел теоретический, т.е. никаких задач и программ (за исключением небольших фрагментов) - для этого есть отдельный раздел!

 
 Ответить  Открыть новую тему 
> Read(string) Or Read(char);
сообщение
Сообщение #1


Знаток
****

Группа: Пользователи
Сообщений: 424
Пол: Мужской

Репутация: -  2  +


Люди помогите что-то глючит, не могу понять что
использую read(s); где s:string
read(ch); где ch:char;
а он это игнорирует!!!!
То есть ваще ничего не считывает :
например

...
procedure test(a:integer);;
begin
read(s);
read(a);
end;
...


считывает сразу а , а стриг не считывает sad.gif


--------------------
Чего хочет женщина – того хочет Бог
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #2


Гость






А ты приведи то, ЧТО ты вводишь... Кроме этого, твой кусок кода НЕ скомпилируется, а телепатов здесь нет... Кто знает, что ты там натворил...
 К началу страницы 
+ Ответить 
сообщение
Сообщение #3


Автооответчик
*****

Группа: Пользователи
Сообщений: 1 188
Пол: Мужской
Реальное имя: Александр

Репутация: -  16  +


smile.gif удалим, не бойся =)
я его скрою, чтобы только модеры могли его видеть wink.gif

кстати, впредь такой объемный код приаттачивай, ок ?


--------------------
Неадекватная чушь может быть адекватным ответом на неадекватный вопрос. Понятно или разжевать?
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #4


Знаток
****

Группа: Пользователи
Сообщений: 424
Пол: Мужской

Репутация: -  2  +


Окей smile.gif

Добавлено (через час):
Ого что никто ничего не придумал?
blink.gif


--------------------
Чего хочет женщина – того хочет Бог
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #5


Автооответчик
*****

Группа: Пользователи
Сообщений: 1 188
Пол: Мужской
Реальное имя: Александр

Репутация: -  16  +


кажется, ты читаешь read`ом в char? вообще-то в char читают Readkey`ем...


--------------------
Неадекватная чушь может быть адекватным ответом на неадекватный вопрос. Понятно или разжевать?
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #6


Знаток
****

Группа: Пользователи
Сообщений: 424
Пол: Мужской

Репутация: -  2  +


а со стрингом что?


--------------------
Чего хочет женщина – того хочет Бог
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #7


просто человек
******

Группа: Пользователи
Сообщений: 3 641
Пол: Женский
Реальное имя: Юлия

Репутация: -  55  +


откуда читаешь?
и вообще, не поняла...
а-это char или integer?


--------------------
Все содержимое данного сообщения (кроме цитат) является моим личным скромным мнением и на статус истины в высшей инстанции не претендует.
На вопросы по программированию, физике, математике и т.д. в аське и личке не отвечаю. Даже "один-единственный раз" в виде исключения!
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #8


Автооответчик
*****

Группа: Пользователи
Сообщений: 1 188
Пол: Мужской
Реальное имя: Александр

Репутация: -  16  +


хз.. по идее стринг должен нормально читаться read`ом...
для управления лучше делать так:
Код

...
case readkey of
'4': {нажатие на четверку};
'6': {нажатие на шестерку};
'8': {нажатие на восьмерку};
'2': {нажатие на двойку};
end;


Цитата
откуда читаешь?
и вообще, не поняла...
а-это char или integer?


ой, лучше и не пытайся smile.gif я сам не совем все понял wacko.gif


--------------------
Неадекватная чушь может быть адекватным ответом на неадекватный вопрос. Понятно или разжевать?
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #9


Знаток
****

Группа: Пользователи
Сообщений: 424
Пол: Мужской

Репутация: -  2  +


стринг считывается с процедуре создания формы.


--------------------
Чего хочет женщина – того хочет Бог
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #10


Perl. Just code it!
******

Группа: Пользователи
Сообщений: 4 100
Пол: Мужской
Реальное имя: Андрей

Репутация: -  44  +


Не стал копаться в коде, но мне кажется, что ты хочешь ипользовать read, не правильным образом, проверь вот это :

uses crt;
var
ch : char;
s : string;

begin

clrscr;

read(ch,s); {pascal}

writeln(s); {ascal}
writeln(ch);{p}
readln;
end.


Сообщение отредактировано: klem4 -


--------------------
perl -e 'print for (map{chr(hex)}("4861707079204E6577205965617221"=~/(.{2})/g)), "\n";'
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #11


Гость






 
program f_and_w;
uses CRT;
var f,w:string;
begin
ClrScr;
Write ('1:');
Read (f);
Write (' 2:');
ReadLn (w);
Write (f,' ',w);
ReadLn;
end.


Не работает!
Вместо
Код

1:(ddd) 2:(sss)
ddd sss

Выводит
Код

1:(ddd)
2:ddd

(В скобках вводимые значения)
 К началу страницы 
+ Ответить 

 Ответить  Открыть новую тему 
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 




- Текстовая версия 19.02.2018 11:23
Хостинг предоставлен компанией "Веб Сервис Центр" при поддержке компании "ДокЛаб"