Почему length для пустой строки выдает 1 ?

28.10.2012, 16:02. Показов 859. Ответов 0

Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам

Задача следующая... записать в файл данные.
Запускаю программу, ввожу одну строку,другую, все ок, теперь надо завершить ввод ,ничего не вводя жму Enter, и получаю, что Length(temp) = 1, а не 0. Почему так?
Привожу кусок программы.

Pascal

program zadanie42;
 
var
  f,g:text;
  temp:string;
Begin
  assign(f,'Ffile.txt');
  assign(g,'Gfile.txt');
  rewrite(f);
  {вводим данные в 1 файл}
    writeln('Введите данные в файл F:');
    repeat
      readln(temp);
      if Length(temp)<>0 then{если длинна строки неравна 0 , то записываем в файл}
      begin
      WriteLn(f,temp);
      end;
      writeln(length(temp));{вывожу для проверки длинны}
    until Length(temp)=0;        
  close(f);
End.

Заказать работу у эксперта

Programming

Эксперт

94731 / 64177 / 26122

Регистрация: 12.04.2006

Сообщений: 116,782

28.10.2012, 16:02

Ответы с готовыми решениями:

Почему при инициализации строки, сначала создаётся пустой объект?
Чтобы при создании присвоить строке какое-то значение, можно использовать два способа: string...

Удаление пустой строки либо заполнение пустой строки нулями
Доброго дня суток. Имеется функция удаления строки со значением 0. procedure...

Почему oldNumber.length -1 ?
function squareDigits(num){ var oldNumber = String(num); var newNum = ''; for(i=0;...

Полосатое закрашивание строк от пустой до пустой строки
Добрый вечер. Подскажите пожалуйста,необходимо в таблице на 50 листах закрасить строки в таком...

	28.10.2012, 16:02

IT_Exp

Эксперт

87844 / 49110 / 22898

Регистрация: 17.06.2006

Сообщений: 92,604

28.10.2012, 16:02

Помогаю со студенческими работами здесь

Почему выдает ошибку nullReferenceException для textbox
При загрузке программы в строке txbx_SpredForLimitOpenOrder.IsEnabled = false выдается ошибка -...

Datagrid CanUserAddRows: не появляется пустой белой строки для ввода данных
Здравствуйте, использую MVVVM и EF. На форме есть Датагрид у которого стои CanUserAddRows = true,...

Есть ли в std, или где-нибудь ещё, константа для пустой строки (""), как endl (\n) для символа переноса?
Раздражает писать так: return "";

Подскажите, почему для каждого объекта в программе выдает две ошибки
Вот ошибки: error C2146: синтаксическая ошибка: отсутствие ";" перед идентификатором "o_enemy" ...

Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:

Наверх