Предмет: Информатика,
автор: beenchmark
нужно написать программу на языке Паскаль, которая будет убирать из строки все символы кроме цифр. Пример: входной- a3f4h5k&2 выходной:3452
Ответы
Автор ответа:
0
var s:string;
l,i:longint;
begin
read(s);
l:=length(s);
for i:=1 to l do
if (s[i]>='0')and(s[i]<='9') then write(s[i]);
end.
l,i:longint;
begin
read(s);
l:=length(s);
for i:=1 to l do
if (s[i]>='0')and(s[i]<='9') then write(s[i]);
end.
Автор ответа:
0
там блин как-то диапозон можно выставить, а я забыл как =)
Автор ответа:
0
if (s[i] >= '0') and (s[i] <= '9')
По стандарту языка, вроде как, цифры должны идти по порядку
По стандарту языка, вроде как, цифры должны идти по порядку
Автор ответа:
0
да, ты прав
Автор ответа:
0
А где удаление символов из строки, как в задании написано?
Автор ответа:
0
там смотри условие, если данный символ число то печатать его крч =)
Автор ответа:
0
// PascalABC.NET 3.1, сборка 1172 от 19.02.2016
begin
var s:=ReadlnString;
s:=s.Where(d->d in ['0'..'9']).JoinIntoString('');
Writeln(s)
end.
Тестовое решение:
a3f4h5k&2
3452
begin
var s:=ReadlnString;
s:=s.Where(d->d in ['0'..'9']).JoinIntoString('');
Writeln(s)
end.
Тестовое решение:
a3f4h5k&2
3452
Интересные вопросы
Предмет: История,
автор: yaroclava2009
Предмет: Русский язык,
автор: kulseitovsact
Предмет: Информатика,
автор: Alice12344567889
Предмет: Геометрия,
автор: PolishaCrazy
Предмет: Геометрия,
автор: lelyakulakova55