Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Паскаль, Turbo Pascal, PascalABC.NET
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 19.05.2011, 11:58   #1
adm2010
Пользователь
 
Регистрация: 30.11.2010
Сообщений: 20
По умолчанию заменя символов

написать функцию заменяющую символы табуляции на соответствующее число пробелов
как в эту программу записать символ Tab и сделать чтоб он заменял на СООТВЕТСТВУЮЩЕЕ число пробелов?подскажите пожалуйста

Var a:array[1..100] of string;
n,i: integer;
begin
write('Введите количество элементов: '); readln(n);
write('Введите элементы массива'); for i:=1 to n do readln(a[i]);
for i:= 1 to n do
if a[i]=!!! then a[i]:=!!!;
for i:=1 to n do write (a[i],' ');
readln;
end.

Последний раз редактировалось adm2010; 19.05.2011 в 12:02.
adm2010 вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Дана последовательность символов (строка). Группу символов, разделенную с одной или обеих сторон пробелам viper1941 Паскаль, Turbo Pascal, PascalABC.NET 1 14.04.2011 08:46
Что делать, если количество символов в билдере не соответствует количеству символов в билде? BoT_T Общие вопросы Delphi 0 16.11.2010 10:42
верно ли, что среди символов данного текста есть n подряд идущих символов, Yuliya-Nik Помощь студентам 0 06.10.2010 23:44
стек символов zhenya.ya Помощь студентам 1 22.03.2010 08:56
c++ замена символов sveta11115 Помощь студентам 0 21.03.2010 00:09