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

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

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

> Read(string) Or Read(char);
arhimag
сообщение 16.02.2006 19:53
Сообщение #1


Знаток
****

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

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


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

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


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


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


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 - 17.02.2006 8:08


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

Сообщений в этой теме


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

 



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