Ответы на вопрос:
Var s: string; begin writeln('введите строку: '); readln(s); while pos(' ',s)< > 0 do delete(s,pos(' ',s),1); writeln(s); end. пример: введите строку: удалить из нее все пробелы. удалитьизнеевсепробелы.
Популярно: Информатика
-
privetikivsem09.04.2021 18:06
-
Masha699624.10.2020 05:40
-
персик0816.09.2021 20:00
-
lilipute201714.05.2021 04:25
-
nigina880704.06.2023 20:33
-
uhvvivdgb28.03.2022 23:11
-
NastyuZnanija01.12.2021 10:36
-
andreisena4ev12.10.2021 18:08
-
kanaev0706.05.2021 10:04
-
Milkapilka1125.08.2020 12:16