|
|
Вопрос по оператору Read(R): после ввода числа и нажатия Enter курсор должен остаться на той же строке и, если будет следующий Read(R), то он должен писаться на той же строке.
Я хотел вводить N строк по M цифр, чтобы после ввода М цифр в одной строке автоматически производился переход на новую строку - например 3 строки по 4 цифры:
1 0 1 0
1 1 0 0
0 1 0 1
Для этого написал:
for I:=1 to N do
begin
for J:=1 to M do
begin
write(' ');
read(R);
if R=0 then buf[I,J]:=0
else buf[I,J]:=1;
end;
writeln;
end;
и т.д...
( в теле еще заполняется буфер, причем 0 остается 0, а любая цифра становится 1).
Но получается, что перевод строки происходит после ввода каждой цифры, т.е. вводится не в строку, а в столбик.
Что-то путное получается, когда ввожу М цифр через пробел, а потом нажимаю Энтер, но тогда нужно самому считать М цифр в строке.
Паскаль вроде бы - Турбо 7.0.
E-mail: 
info@telesys.ru
