Pascal как проверить пустая строка или нет?
Здрасти как мне проверить пустая строка или не?
тут я проверяю если первого символ пустота я его стираю.
while txt[1]=' ' do
begin
delete(txt,1,1);
end;
но как только я ввожу в программу только пустые символы в строку то программа зависает.
Попробовал сделать проверку
else if txt =' ' then
begin
writeln('Vi vveli pustuju stroku');
goto konec;
end;
Но всё равно зависает. Помогите советом
По дате
По рейтингу
while (txt<>'') and (txt[1]=' ') do delete(txt,1,1);
Не "пустота", а "пробел". Ты не можешь проверить, пробел ли первый символ, если в строке вообще нет символов. Проверяй сначала, что длина строки >=1, а потом уже проверяй первый символ.
if length(string) = 0 then