Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
uhbarashek321
10.07.2021 05:24 •
Информатика
Составьте программу позволяющую выяснить сколько раз встречается каждая буква алфавита во введенной строке s.
Ответ:
XeaTeaK
15.07.2020 09:28
А$= "Текст"
Input a$
s=0
For I=1 to Len(a$)
IF Mid$(a$,I.1)= " =) " Then s=s+1
next I
Print s
Заместо смайла =) введешь свою букву
0,0
(0 оценок)
Популярные вопросы: Информатика
Арбуз2200047
09.04.2020 03:45
Какое из приведенных имен удовлетворяет логическому условию (первая буква гласная →вторая буква гласная)˅предпоследняя буква согласная? а) АНДРЕЙ б) ОФЕЛИЯ в) АНТОН г) ОЛЬГА...
пвиопп
26.05.2022 05:03
Последние ! даны действительные числа a и b . если числа не равны, то большее увеличить в пять раз, а меньшее уменьшить на пять, в противном случае, если они положительные,...
myrzik5293p081ps
02.08.2021 06:35
Cформулировать двухмерный массив, состоящий из n x n элементов: заменить нулями все элементы что расположены на главной диагонали и выше неё...
serhio2000
02.08.2021 06:35
Дан целочисленный массив a размера n.найти максимальный элемент из его элементов с нечетными номерами a1,a3,...
suzyter839робисан
10.07.2021 18:30
Составьте программу, определяющую максимальный элемент и его индексы матрицы а размерами mxn(паскаль)...
takeoff
26.07.2021 01:17
Укажите через запятую в порядке возрастания все основания систем счисления, в которых запись числа 22 оканчивается на 4....
Иваныч71
09.02.2022 10:10
Мы сделали кнопки в pascalabc.net. как сделать так, чтобы когда на них нажимаешь, то выводился на экран текст. заранее . вот код программы: uses graphabc, abcobjects,abcbuttons;...
ВанькаНер
09.02.2022 10:10
Найдите основание системы счисления, в которой выполнено следующее сложение: 144 + 24 = 201. с решением...
uapavlovaoy4dah
12.11.2020 11:58
Вспомните название операционной системы установленной на ваших компьютерах...
elensarkisian
15.04.2023 12:57
Дан текстовый файл. вывести на экран самую длинную строку из файла.через паскале....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Input a$
s=0
For I=1 to Len(a$)
IF Mid$(a$,I.1)= " =) " Then s=s+1
next I
Print s
Заместо смайла =) введешь свою букву