В символьном файле записаны слова, разделенные пробелами. Удалить из файла слова, состоящие менее чем из трех букв, и лишние пробелы. Мой исходник: program zz; var file:file of char; begin assign(file,'file.txt'); rewrite(file); writeln('Ведите строку слов:'); read(file); i:=i+1; while not eof(file) do begin while not eof(file) do i:=i+1 if file(i)=' ' then k:=i+1; delete(file;i,j) end; end. Все вроде бы шло гладко но вот остановилсяна проблеме запоминания позицый пробелов... Внесите пожалуйстакорективы