Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
ValeriaChernysheva
13.06.2020 10:55 •
Информатика
Информатика: сколько букв "а" в слове абракадабра - написать программу в pascal abc, которая выводит кол-во букв"а" на экран
Показать ответ
Ответ:
nrdnct
05.10.2020 13:39
Program n1;
var st: string;
i,k: integer;
begin
st:='абракадабра';
k:=0;
for i:=1 to st.Length do
if st[i]='а' then k:=k+1;
writeln('в этом слове ',k,' букв а');
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
arinka3859
13.11.2022 08:43
Определите время свободного падения тела с высоты h, написать программу в среде vbs...
Lbailieva
29.09.2020 08:06
Дано: ф или э-3400 ф-2100 ф и э=900 найти -э ? кто знает,...
UAola
28.11.2020 06:53
Сообщение, записанное 32-х символьным алфавитом содержит 40 символов. определить его информативность...
Selid
10.03.2023 05:13
Составить программу, которая запрашивает пароль (трехзначное число + 2 символа) до тех пор, пока он не будет правильно введен. Верный пароль должен быть задан в виде константы!...
AbilfaizK
03.11.2022 14:03
260 кг кызынак жиналды. n жашикке 24 кг нан салынды. Неше килограмм кызынак калды n=8деп алып оны есепте тез керек болып тур...
brazervind
03.11.2022 14:03
Подскажите упраднение номер 398 справочное пособие узорова нефёдова быстрей 4класс...
inesssa444
16.12.2021 00:15
Составьте кроссворд на тему баскетбол со словами: 1. бросок 2. пробежка 3. ведение 4. передача 5. подбор 6. мяч 7.прыжок 8.штрафной 9.команда 10.кольцо...
nellit03
28.07.2022 06:20
1. База данных задана таблицей ( ): № Ф.И.О. пол возраст дата рождения клуб спорт 1 Панько Л.П. жен 22 13.08.1989 Спарта футбол 2 Арбузов А.А. муж 20 03.11.1992 Динамо лыжи...
Isuna
28.07.2022 06:20
По СТРАХОВАНИЮ Возраст 30лет, срок страхования 15лет, коэффициент рассрочки 11,67, процентная ставка 0,3, доля нагрузки 30 %, страховая сумма 100 руб Определить годовую...
panda7777777777
16.12.2021 00:15
Тесты по физической культуре 6 класс 1. Какой вид спорта называют «королевой спорта»? а) гимнастику; б) легкую атлетику; в) тяжелую атлетику 2. К спринтерскому бегу в легкой...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
var st: string;
i,k: integer;
begin
st:='абракадабра';
k:=0;
for i:=1 to st.Length do
if st[i]='а' then k:=k+1;
writeln('в этом слове ',k,' букв а');
end.