В заданном тексте удалить все цифры (остальные символы оставить неизменными)

@masha1994 · Регистрация: 24.02.2014

эту программу нужно написать по теме :Обработка строковых данных в языке программирования Pascal

@Puporev · 11.04.2014, 08:20

Pascal

1 2	for i:=length(s) do if s[i] in ['0'..'9'] then delete(s,i,1);

@masha1994 0 / 0 / 3 Регистрация: 24.02.2014 Сообщений: 59
		1
	В заданном тексте удалить все цифры (остальные символы оставить неизменными) 11.04.2014, 02:28. Показов 1765. Ответов 1 Метки нет (Все метки) эту программу нужно написать по теме :Обработка строковых данных в языке программирования Pascal 0

	11.04.2014, 08:20

Решение