Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
yarik159
15.07.2021 07:22 •
Информатика
Паскаль. дан текст. написать программу, которая подсчитывает количество слов, в тексте учитывая, что между словами может быть по несколько пробелов.
Показать ответ
Ответ:
Ksu576
28.09.2020 10:47
// PascalABC.NET 3.1, сборка 1250 от 28.05.2016
begin
var s:=ReadlnString('Вводите:');
Write('Кол-во слов: ',s.ToWords.Count)
end.
Тестовое решение
Вводите: А роза упала на лапу Азора
Кол-во слов: 6
0,0
(0 оценок)
Популярные вопросы: Информатика
olya200512
25.09.2022 07:08
Задача 4: Американские горки Аттракцион «Американские горки» представляет собой рельсовый трек, размещённый на опорах. Известна высота каждой опоры. Для рекламы аттракциона...
fd1132
13.07.2020 12:11
Написать программу на языке Паскаль вычисления площади треугольника по трем сторонам: a, b, c. (Используя формулу Герона)...
kotovaalina31
15.01.2021 17:43
Все балы! Информатика на завтра Все балы! Информатика на завтра...
kvashenko403
18.09.2022 04:56
Впервые искусственный робот был создан в каком году? * 1775177017761771...
alinademushkina1
18.09.2022 04:56
В системе КуМир составьте алгоритм рисования номера телефона 322 32 33. Сделайте скриншот программы и результата выполнения программы, прикрепите файл для проверки....
ИльяМамедов2
27.02.2021 02:03
Что такое цикл с постусловием ? 1)цикл, в котором условие проверяется после выполнения тела цикла. 2)цикл, в котором условие проверяется перед выполнения тела цикла. 3)цикл,...
ПётрФ
13.01.2022 13:37
1. Установите соответствия между выражениями их результатами 1. 52//251.152. 40%252.33.27/14 4. 27%44.6 ...
alina245717887
29.04.2020 06:52
Треба намалювати прилад з фвгур. 2 клас інформатика...
Мандер
06.01.2023 03:50
Какое кол-во гбайт содержится 22338299392 байт...
Liza031111
26.04.2020 22:59
20 ! ! покажите полные решения : 1. опишите метод кодирование информации с шифра цезаря. используя шифр цезаря, декодировать следующие фразы: а) хижтзсг щтфтьдг утжтзд!...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
begin
var s:=ReadlnString('Вводите:');
Write('Кол-во слов: ',s.ToWords.Count)
end.
Тестовое решение
Вводите: А роза упала на лапу Азора
Кол-во слов: 6