Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
as79118487190
06.11.2020 00:44 •
Информатика
Цикл while в paskal abc удалить все пробелы в сторке
Ответ:
стулка
09.10.2020 12:20
var s:string;
begin
read(s);
while pos(' ',s)>0 do
delete(s,pos(' ',s),1);
write(s)
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
Монтер111
08.10.2021 21:21
Вычислить в паскаль 1. y=x-x^2/3+x^6/4 2. y= 3^-x+cos(x)-sinx^2 3. y=x^3+9x+12/x^2-6x+15 4. y= x+12sin(2x)+ |x^3+x^5| умоляю, напишите с кодом программ, заранее!...
Алена173
07.05.2021 09:18
Ввести целые положительные числа n и k, вывести на экран все нечетные числа принадлежащие отрезку [1; n], кратные k....
annasefershaeva
05.11.2021 09:42
Подскажите добрые люди правильный ответ! для растровых графических изображений справедливо утверждение, что… а) растровое изображение представляет собой последовательность точек...
vitalik153fb
05.11.2021 09:42
Написать программу вычисления стоимости покупки с учетом скидки 3% сумма больше 200 рублей...
AnnaXolcman3003
23.05.2021 15:42
Ввести с клавиатуры час суток.напечатать время суток,утро,день,ночь,.в pascal....
МахитоТ
23.05.2021 15:42
Pascal. решить, используя массив+for+random - дан массив num из 20 элементов - инвентарные номера книг в библиотеке. элементы по возрастанию, но могут отличаться друг от друга...
Felipinec
04.11.2020 21:45
♥♥♥ программа паскаль вывода натуральных чисел из диапазона а б...
Mrkeu
26.06.2020 06:42
Написать программу, которая проверяет, является ли число целым в паскале...
KaterinaFadeeva
09.07.2021 11:33
Из условия летние каникулы выясните , чем занимался каждый из друзей летом....
lilia104
28.09.2021 05:12
Перевести: 28 Мбайт= ?байт 2048000бит=?кб 3.5 Кб=?бит...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
var s:string;
begin
read(s);
while pos(' ',s)>0 do
delete(s,pos(' ',s),1);
write(s)
end.