Ответы на вопрос:
Var s1,s2: string; i: integer; begin writeln('введите текст: '); readln(s1); s2: =''; for i: =1 to length(s1) do if (s1[i]< '0')or(s1[i]> '9') then s2: =s2+s1[i]; writeln(s2); end. пример: введите текст: в два ряда дома стоят – 10, 20, 100 подряд. в два ряда дома стоят – , , подряд.
Популярно: Информатика
-
ира128821.10.2020 04:40
-
bocmanlera08.06.2021 18:13
-
BakerTaka12.06.2021 02:02
-
melisa200715.05.2020 15:14
-
DaveDead19.07.2022 06:50
-
Arina2008egor15.04.2021 08:35
-
snoopelol501.09.2021 00:19
-
AnnaVlasova0912.11.2021 23:00
-
Милена300104.12.2022 23:01
-
italyyyy29.06.2022 18:53