Удалить из текстового файла все цифры.

@катюша · Регистрация: 21.09.2009

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

помогите пожалуйста с програмкой.Дан текстовый файл. Удалить из файла все цифры.

Добавлено через 1 час 15 минут
ну неужели никто не может помочь?

@Тамила · 31.01.2010, 14:37

ну проверяйте на входимость в множество ['0'..'9']

@катюша · 31.01.2010, 14:44 **[ТС]**

а можно как то поподробнее?что т у меня с файлами вообще не ладится

@Puporev · 31.01.2010, 17:46

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
uses crt;
var f,g:text;
    i:byte;
    name,s:string;
begin
clrscr;
write('Имя файла для чтения: ');
readln(name);
name:=name+'.txt';
assign(f,name);//связываем файл с переменной
{$I-} reset(f);  {$I+}//пытаемся его открыть
if IOResult <> 0 then
 begin
  writeLn('Не могу открыть файл ',name);
  writeLn('Работа программы завершена. Нажмите ENTER');
  readln;
  exit;
 end;
write('Имя файла для записи: ');
readln(name);
name:=name+'.txt';
assign(g,name);//связываем переменную с файлом для записи
rewrite(g);
while not eof(f) do//пока не конец первого файла
 begin
  readln(f,s);//читаем строки
  for i:=length(s) downto 1 do//идем с конца строки
  if s[i] in ['0'..'9'] then delete(s,i,1);//удаляем цифры
  writeln(g,s);//записываем измененную строку в новый файл
 end;
close(f);
close(g);1//закрываем файлы
write('Файл переписан!');
readln
end.

@катюша · 31.01.2010, 19:22 **[ТС]**

у меня он все время не может открыть файл, почему?

Добавлено через 2 минуты
все спасибо я разобралась!

@semenn · 03.02.2010, 02:16

Сообщение от катюша

у меня он все время не может открыть файл, почему?

Добавлено через 2 минуты
все спасибо я разобралась!

Подскажи што за ошибка

Добавлено через 3 минуты
тоже догнал

Новые блоги и статьи Все статьи Все блоги /
Управление камерой с помощью скрипта OrbitControls.js на Three.js: Вращение, зум и панорамирование 8Observer8 05.03.2026 Содержание блога Финальная демка в браузере работает на Desktop и мобильных браузерах. Итоговый код: orbit-controls-threejs-js. zip. Сканируйте QR-код на мобильном. Вращайте камеру одним пальцем,. . .	SDL3 для Web (WebAssembly): Синхронизация спрайтов SDL3 и тел Box2D 8Observer8 04.03.2026 Содержание блога Финальная демка в браузере. Итоговый код: finish-sync-physics-sprites-sdl3-c. zip На первой гифке отладочные линии отключены, а на второй включены:. . .	SDL3 для Web (WebAssembly): Идентификация объектов на Box2D v3 - использование userData и событий коллизий 8Observer8 02.03.2026 Содержание блога Финальная демка в браузере. Итоговый код: finish-collision-events-sdl3-c. zip Сканируйте QR-код на мобильном и вы увидите, что появится джойстик для управления главным героем. . . .	Реалии Hrethgir 01.03.2026 Нет, я не закончил до сих пор симулятор. Эта задача сложнее. Не получилось уйти в плавсостав, но оно и к лучшему, возможно. Точнее получалось - но сварщиком в палубную команду, а это значит, в моём. . .
Ритм жизни kumehtar 27.02.2026 Иногда приходится жить в ритме, где дел становится всё больше, а вовлечения в происходящее — всё меньше. Плотный график не даёт вниманию закрепиться ни на одном событии. Утро начинается с быстрых,. . .	SDL3 для Web (WebAssembly): Сборка библиотек: SDL3, Box2D, FreeType, SDL3_ttf, SDL3_mixer и SDL3_image из исходников с помощью CMake и Emscripten 8Observer8 27.02.2026 Недавно вышла версия 3. 4. 2 библиотеки SDL3. На странице официальной релиза доступны исходники, готовые DLL (для x86, x64, arm64), а также библиотеки для разработки под Android, MinGW и Visual Studio. . . .	SDL3 для Web (WebAssembly): Реализация движения на Box2D v3 - трение и коллизии с повёрнутыми стенами 8Observer8 20.02.2026 Содержание блога Box2D позволяет легко создать главного героя, который не проходит сквозь стены и перемещается с заданным трением о препятствия, которые можно располагать под углом, как верхнее. . .	Конвертировать закладки radiotray-ng в m3u-плейлист damix 19.02.2026 Это можно сделать скриптом для PowerShell. Использование . \СonvertRadiotrayToM3U. ps1 <path_to_bookmarks. json> Рядом с файлом bookmarks. json появится файл bookmarks. m3u с результатом. # Check if. . .

@катюша 2 / 2 / 0 Регистрация: 21.09.2009 Сообщений: 75

	Удалить из текстового файла все цифры. 31.01.2010, 14:06. Показов 4716. Ответов 5 Метки нет (Все метки) помогите пожалуйста с програмкой.Дан текстовый файл. Удалить из файла все цифры. Добавлено через 1 час 15 минут ну неужели никто не может помочь? 0

@Тамила 753 / 546 / 211 Регистрация: 12.11.2009 Сообщений: 1,100
	31.01.2010, 14:37
	ну проверяйте на входимость в множество ['0'..'9'] 0

@катюша 2 / 2 / 0 Регистрация: 21.09.2009 Сообщений: 75
	31.01.2010, 14:44 [ТС]
	а можно как то поподробнее?что т у меня с файлами вообще не ладится 0

@катюша 2 / 2 / 0 Регистрация: 21.09.2009 Сообщений: 75
	31.01.2010, 19:22 [ТС]
	у меня он все время не может открыть файл, почему? Добавлено через 2 минуты все спасибо я разобралась! 0