нужно написать программу на языке Паскаль, которая будет убирать из строки все с...

August 2022 1 23 Report

нужно написать программу на языке Паскаль, которая будет убирать из строки все символы кроме цифр. Пример: входной- a3f4h5k&2 выходной:3452

Answers & Comments

ZusTY // 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

2 votes Thanks 1

beenchmark а без OR можно как нибудь?

ZusTY без понятия

ZusTY можно наверное

ZusTY но я не настолько хорошо стринг знаю

beenchmark там блин как-то диапозон можно выставить, а я забыл как =)

Segrif if (s[i] >= '0') and (s[i] <= '9')
По стандарту языка, вроде как, цифры должны идти по порядку

ZusTY да, ты прав

srzontmp А где удаление символов из строки, как в задании написано?

beenchmark там смотри условие, если данный символ число то печатать его крч =)

Answers & Comments

trebuetsya najti samuyu dlinnuyu nepreryvnuyu cepochku nulej v posledovatelnosti nul

dana stroka iz n simvolovvse chisla zakanchivayushayasya nulem nol v etoj stroke

kak vvesti strokovyj tip dannyh string cherez probel v paskale

dana strokastring iz treh chisel razdelennyh probelom nuzhno ih prisvoit k a1

dana programma kotoraya dolzhna udalyat probely iz stroki program var15stroki

рекомендуемые вопросы

Helpful Links

Helpful Social