Составить программу для решения следующей задачи. из строки выбрать все цифры и сформировать другую строку S=sdfg745tg2345dfg74M=7452234574
Составить программу для решения следующей задачи. из строки выбрать все цифры и сформировать другую строку
S=sdfg745tg2345dfg74
M=7452234574
Гость
Ответ(ы) на вопрос:
Гостьvar
i:integer;
s,m:string;
begin
readln(s);
for i:=1 to Length(s) do
if s[i] in ['0'..'9'] then m:=m+s[i];
write(m);
end.
Не нашли ответ?
Похожие вопросы