Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
pershikovanata
27.05.2020 06:06 •
Информатика
Удалить в тексте, все слова которого разделены одним пробелом, первое слово, если в нём больше, чем 7 букв. (школьный pascal)
Показать ответ
Ответ:
gern74p01ako
26.08.2020 01:28
Var
s:string;
begin
readln(s);
if pos(' ',s)>8 then delete(s,1,pos(' ',s));
writeln(s);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
Sapff1ra
04.01.2020 06:53
Program prim1; uses crt; var a,i: integer; begin read(a); i: =1; while i 10 do begin i: =i+1; write(a); end; end. это программа для того чтобы вывести 10 одинаковых чисел...
ushanoval
02.05.2020 15:49
Какой объем видиопамяти занимает изображение размером 640 х 350 пикселей, если используется 16 цветов?...
Riyaa
02.05.2020 15:49
1) какие сведения могут получить,наблюдая такое явление как радуга художник, и мальчик? 2) составить собственную информационную модель этого явления...
chertan98
27.08.2022 06:00
Создать двумерный массив размерностью 7*5 состоящих из целых чисел в диапазоне от - 10 10 вывести на экран найти максимальный элемент в каждой строке(pascal) ...
DOSYMZHAN1
19.05.2022 04:38
Определите значение переменной s после выполнения фрагмента алгоритма: на «4» s: =0; m: =6: for i: =3 to m do s: =s+i...
nikserg223
02.08.2020 07:20
Оформите в виде блок-схемы признак делимости натурального числа на 3...
RDD1
24.06.2020 21:23
Перевести код из pascal в c# const n = 10; // меняем для изменения количества чисел var a: array [1..n] of integer; i: integer; procedure fill; begin write( введите число:...
daryaaleksandr2
15.09.2022 11:34
Дана группа объектов. выбери наиболее подходящее общее имя.группа объектов: франция, латвия, эстония, германия.политологистраны евросоюзастажёрыстолицы...
bhsdvsbvgvfsbvefe
03.11.2020 01:20
Решите, тест дома лежит 2 стопки тетрадей, а тест завтра проводить надо, ответов нету, тест...
POMIDOrio
12.10.2021 16:13
Сколько единиц в двоичной записи десятичного числа 175,025?...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
s:string;
begin
readln(s);
if pos(' ',s)>8 then delete(s,1,pos(' ',s));
writeln(s);
end.