составить программу для решения следующей задачи. из строки выбрать все цифры и сформировать другую строку
S=sdfg745tg2345dfg74
M=7452234574
Ответы
Ответ дал:
0
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.
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.
Похожие вопросы
2 года назад
7 лет назад
7 лет назад
10 лет назад
10 лет назад