uses crt;
label metka;
var s:string; n,i:integer;
begin
metka:  write(‘Введите параметр: ') ;
  readln(s); n:=length(s);
  for i:=1 to n do begin
  s[i]:=LowCase(s[i]);
   if not (s[i] in ['a'..'z']) and not (s[i] in ['а'..'я']) then begin
             delete(s,i,1);
             if i<n then i:=i-1; 
             n:=length(s);
             end;
 end;
  writeln(s) ;  goto metka;
end.

Добавлено через 1 минуту
Знаю только то что надо использовать paramstr, но как его правильно оформить??

Заказать работу у эксперта

Programming

Эксперт

94731 / 64177 / 26122

Регистрация: 12.04.2006

Сообщений: 116,782

15.12.2010, 00:40

Ответы с готовыми решениями:

Дана символьная строка. Определить, содержит ли строка числа, если да, то вывести на экран только четные
Прошу не просто написать программу, а помочь ее понять, потому что до ввода строки у меня все...

Командная строка
Нужно оформить программу в виде командной строки (с историей команд, вызываемой стрелками, и...

Командная строка
Всем привет..Мне нужно написать программу, которая запускает командную строку..Скажи пожалуйста...

Командная строка
Просьба: Уважаемые, товарищи, программисты, подскажите, пожалуйста, как программно можно отдавать...

	15.12.2010, 00:40

IT_Exp

Эксперт

87844 / 49110 / 22898

Регистрация: 17.06.2006

Сообщений: 92,604

15.12.2010, 00:40

Помогаю со студенческими работами здесь

Командная строка
Как из Дельфи обратиться к параметру командной строки? Мне нужен примерчик или указание на нужную...

Командная строка и приложение exe
Здравствуйте! Возник у меня тут недавно один вопросик :) Вот смотрите: компилируется у меня...

Паскаль-игра и командная строка, где она и играется
Сделал очень простенькую игрушку. Вот код: var a,b:string;n,e:integer; procedure game; begin ...

Получить действительный матрицу А( n,m) Первая строка которого задана формулой C1j=2*j+3, вторая строка задается формулой С2j=2+1/j, а каждая следующая строка есть сумма предыдущих.
Получить действительный матрицу А( n,m) Первая строка которого задана формулой C1j=2*j+3, вторая...

Создать запись «Кинофильм» с полями: «Название» (строка), «Страна» (строка)
В заголовок окна программы записать свои данные: имя, фамилию и номер варианта. - Для всех...

Создать запись «Студент» с полями: «Имя» (строка), «Предмет» (строка), «Оценка» (целое число). Имена студентов
Создать запись «Студент» с полями: «Имя» (строка), «Предмет» (строка), «Оценка» (целое число)....

Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:

Опции темы

Наверх