Задан текст. Удалить из текста знаки («») - Pascal ABC

Формулировка задачи:

Как это сделать?


textual

Код к задаче: «Задан текст. Удалить из текста знаки («») - Pascal ABC»

Program forum;
 uses crt;
 var
  s :String;
  i,l :byte;
 
begin
  clrscr;
  readln(s);
  for i:=1 to Length(s) do
    if s[i]='«' then Delete(s,i,1);
    if s[i]='»' then Delete(s,i,1);
  writeln(s);
  readln;
end.
Эта работа вам не подошла?

Вы всегда можете заказать любую учебную работу у наших авторов от 20 руб.


СДЕЛАЙТЕ РЕПОСТ

14   голосов, оценка 4.071 из 5

Источник
Похожие ответы