Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 5.00/6: Рейтинг темы: голосов - 6, средняя оценка - 5.00
1 / 1 / 0
Регистрация: 09.10.2011
Сообщений: 6

В тексте узнать которые из букв 'a' или 'o' находиться на первом месте

09.10.2011, 12:04. Показов 1181. Ответов 1
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Пока писал две начали работать, осталось только одна, помогите решить)

3) В тексте узнать которые из букв 'a' или 'o' находиться на первом месте. например scola чтобы результат был 'o', аfrica = 'a' , cub = '-'
0
Лучшие ответы (1)
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
09.10.2011, 12:04
Ответы с готовыми решениями:

Узнать количество слов в тексте, которые начинаются с заданных букв
Добрый день, я впервые у вас на форуме. Друг попросил найти решение двух задач по С++, у него у самого инета нету. Помогите люди добрые...

Строка: Как расположить буквы в первом массиве, который типа char, в порядке убывания или возрастания частоты появления букв в тексте?
Имеется два массива. Один типа char из 26 букв алфавита в алфавитном порядке, другой -- типа int из 26 элементов, в которых соответственно...

Подсчитать процент букв «а» в первом слове строки от общего количества букв «а» в тексте
Подсчитать процент букв «а» в первом слове строки от общего количества букв «а» в тексте.

1
 Аватар для Alex1OPS
101 / 100 / 36
Регистрация: 14.09.2010
Сообщений: 223
09.10.2011, 13:09
Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
uses crt;
var s:string;
BEGIN
  clrscr;
  writeln('Введите строку: ');
  readln(s);
  if ((pos('a',s)>pos('o',s)) and (pos('o',s)>0)) then write('o')
  else 
    if ((pos('a',s)=0) and (pos('o',s)=0)) then write('-')
    else write('a');
  readkey;
END.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
09.10.2011, 13:09
Помогаю со студенческими работами здесь

Посчитать количество букв, которые стоят на одном и том же месте
Здравствуйте! Переделываю задачу из Си в Pascal.Не особо ещё изучил этот язык. Вот собственно сама задача: записать строку Х в...

Узнать что стоит на определённом месте (0 или 1)
Уважаемые программисты! Помогите исправить код или решить задачу. Представим себе бесконечную последовательность цифр, составленную из...

Дан текст из строчных латинских букв. Определить каких букв – гласных (a,e,i,o,u) или согласных больше в этом тексте
привет помоги пожалуйста решить задачу по практике,буду очень благодарен(4. Дан текст из строчных латинских букв. Определить каких букв –...

Дана строка символов. Определить, каких букв больше в этом тексте, больших латинских букв или малых
Дана строка символов. Определить, каких букв больше в этом тексте, больших латинских букв или малых. (через множества нужно сделать...

Дан текст из цифр и строчных букв латинского алфавита. Определить каких букв - гласных (a, e, i, j, o, u) или согласных - больше в этом тексте
Дан текст из цифр и строчных букв латинского алфавита. Определить каких букв - гласных (a, e, i, j, o, u) или согласных - больше в этом...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Новые блоги и статьи
Настройки VS Code
Loafer 13.04.2026
{ "cmake. configureOnOpen": false, "diffEditor. ignoreTrimWhitespace": true, "editor. guides. bracketPairs": "active", "extensions. ignoreRecommendations": true, . . .
Оптимизация кода на разграничение прав доступа к элементам формы
Maks 13.04.2026
Алгоритм из решения ниже реализован на нетиповом документе, разработанного в конфигурации КА2. Задачи, как таковой, поставлено не было, проделанное ниже исключительно моя инициатива. Было так:. . .
Контроль заполнения и очистка дат в зависимости от значения перечислений
Maks 12.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: реализовать контроль корректности заполнения дат назначения. . .
Архитектура слоя интернета для сервера-слоя.
Hrethgir 11.04.2026
В продолжение https:/ / www. cyberforum. ru/ blogs/ 223907/ 10860. html Знаешь что я подумал? Раз мы все источники пишем в голове ветки, то ничего не мешает добавить в голову такой источник, который сам. . .
Подстановка значения реквизита справочника в табличную часть документа
Maks 10.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: при выборе сотрудника (справочник Сотрудники) в ТЧ документа. . .
Очистка реквизитов документа при копировании
Maks 09.04.2026
Алгоритм из решения ниже применим как для типовых, так и для нетиповых документов на самых различных конфигурациях. Задача: при копировании документа очищать определенные реквизиты и табличную. . .
модель ЗдравоСохранения 8. Подготовка к разному выполнению заданий
anaschu 08.04.2026
https:/ / github. com/ shumilovas/ med2. git main ветка * содержимое блока дэлэй из старой модели теперь внутри зайца новой модели 8ATzM_2aurI
Блокировка документа от изменений, если он открыт у другого пользователя
Maks 08.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа, разработанного в конфигурации КА2. Задача: запретить редактирование документа, если он открыт у другого пользователя. / / . . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru