Войти
Регистрация
Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Показать больше
Показать меньше
LB1621
21.01.2022 23:13 •
Информатика
Надо в паскале удалить все числа из строки, , не знаю как сделать
Показать ответ
Ответ:
польска
08.07.2020 01:45
Var f,s:string;
i:integer;
begin
read(s);
for i:=1 to length(s) do if(s[i]<'0')or (s[i]>'9')then f:=f+s[i];
writeln(f);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
TvoiOdnoklasnik16
15.02.2021 02:37
Проверьте алгоритм. Все ли правильно? На 5 пойдет ? Дан массив N действительных чисел, подсчитать сколько в нем отрицательных, положительных и нулевых элементов...
Roman789789
10.05.2022 12:46
Смысловые связи между объектами называютсяА) гиперсвязи Б) взаимосвязиВ)линии связейГ)межобьектные связи...
EvaTV
12.05.2023 10:33
РЕШИТЕ ЗАДАЧА ПО Pascal ABC (нужна блок-схема и сама программа). Задача. Если точка с координатами (х,y) лежит в первой координатной четверти, то найти расстояние...
apuha2003p07yqc
22.02.2022 21:08
Приведите примеры целых чисел a и b, каждое из которых не больше 10, чтобы следующие выражение принимало значение ИСТИНА или ЛОЖЬ соответственно f=ab or b //a==a%ba=...
МенязовутКатяЗвога
15.09.2020 22:56
Вести с клав. 2 строки. в какой строке выполняется условие(в какой строке кол-во открывающихся равно закрывающихся.) [ -открыващие ] -закрывающие паскаль...
Даша333555
15.09.2020 22:56
Как сгруппировать слова сканер, мышь, джойстик, клавиатура...
finn10
15.09.2020 22:56
Заменить в слове одну букву на другую так, чтобы получившееся слово имело смысл. например: слон — слог. менять местами буквы запрещено. записать алгоритм превращения...
milaB67
15.12.2021 15:04
Чим цей твір є актуальним сьогодні? Шолом-Алейхем Тев є-молочар...
Dok11111111111
15.12.2021 15:04
Спишите.Доролните пословицы.Подчеркните.1.Как аукнется,так .2.Где тонко,там .3.Там хорошо где ....
umniy1010101000
15.12.2021 15:04
Санчо Панса дав Дон Кіходу ім я......
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
i:integer;
begin
read(s);
for i:=1 to length(s) do if(s[i]<'0')or (s[i]>'9')then f:=f+s[i];
writeln(f);
end.