Версия для печати темы

Нажмите сюда для просмотра этой темы в обычном формате

Форум «Всё о Паскале» _ Теоретические вопросы _ Read(string) Or Read(char);

Автор: arhimag 16.02.2006 23:53

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


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


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

Автор: volvo 16.02.2006 23:56

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

Автор: GoodWind 17.02.2006 0:43

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

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

Автор: arhimag 17.02.2006 1:19

Окей smile.gif

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

Автор: GoodWind 17.02.2006 2:54

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

Автор: arhimag 17.02.2006 2:55

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

Автор: мисс_граффити 17.02.2006 3:00

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

Автор: GoodWind 17.02.2006 3:14

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

Код

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


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


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

Автор: arhimag 17.02.2006 11:37

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

Автор: klem4 17.02.2006 12:08

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

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

begin

clrscr;

read(ch,s); {pascal}

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

Автор: Гость 15.04.2015 20:32

 
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

(В скобках вводимые значения)

Автор: XRumerTest 25.08.2021 9:48

Hello. And Bye.

Автор: artoncraftscn 27.08.2021 18:00

Hello. And Bye.