Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
Другие темы раздела
Pascal ABC Подсчитать наибольшее количество идущих подряд пробелов Даны натуральное число n, символы s...s Подсчитать наибольшее количество идущих подряд пробелов https://www.cyberforum.ru/ pascalabc/ thread1674436.html Умножить элементы первого столбца матрицы на число Pascal ABC
В матрице В(1:3, 1:3) умножить элементы первого столбца на N (образовать массив R(1:3)) и вычислить значение S по формуле S=b12*r1+b22*r2+b32*r3.
Pascal ABC Вводится 5 строк . Заменить первый символ на последний в каждой строке https://www.cyberforum.ru/ pascalabc/ thread1674389.html
Вводится 5 строк . Заменить первый символ на последний в каждой строке .
Pascal ABC Вставить заданное число a в середину массива 2. Дан одномерный массив x. Вставить заданное число a в середину массива. https://www.cyberforum.ru/ pascalabc/ thread1674078.html
Определить номер первого слова, содержащего числовую информацию Pascal ABC
1. Дано предложение. Определить номер первого слова, содержащего числовую информацию.
Pascal ABC Перевести код с Turbo Pascal https://www.cyberforum.ru/ pascalabc/ thread1674047.html
помогите, люди добрые. вот текст программы: program kr5; const max_student = 30; type student = record group: string; {grippa} name: string; {fio} exam: array of shortint; ...
Pascal ABC Калькулятор не работает Всем привет, пишу в первый раз. Знаю темы про калькулятор были, но не нашел того, что мне надо. Вот код. У меня выбивает ошибку. Можете объяснить что неправильно.Спасибо! Program MamaMia9; var... https://www.cyberforum.ru/ pascalabc/ thread1673822.html Описать тип записи Zodiak Pascal ABC
type zodiac = record fi: string; zodiac: string; dr:arrayof integer; end; var z: array of zodiac; i, j: integer; zodiac2: string;
Pascal ABC Написать программу рисования на экране треугольника и вычисления его площади https://www.cyberforum.ru/ pascalabc/ thread1673725.html
Написать программу рисования на экране треугольника и вычисления его площади. Для рисования треугольника по его координатам используйте процедуру Triangle, для вычисления площади функции Geron,...
Pascal ABC Определить радиус и центр окружности, проходящей по крайней мере через три различных точки множества точек Условие: Определить радиус и центр окружности, проходящей по крайней мере через три различных точки заданного множества точек на плоскости и содержащей внутри наибольшее количество точек этого... https://www.cyberforum.ru/ pascalabc/ thread1673722.html
Определить, сколько из чисел удовлетворяет заданному условию Pascal ABC
Напишите программу, которая вводит последовательность целых чисел, заканчивающуюся нулем, и определяет, сколько из этих чисел удовлетворяет условию: сумма значений цифр десятичной записи чисел равна...
Pascal ABC Сортировка двумерного массива методом прямого выбора Помогите пожалуйста с заданием. Выполнить сортировку главной диагонали двумерного массива случайных целых чисел по возрастанию методом прямого выбора.:help: https://www.cyberforum.ru/ pascalabc/ thread1673698.html
39 / 39 / 49
Регистрация: 18.12.2015
Сообщений: 127
03.03.2016, 22:25 0

Определить сколько раз в строке встречаются слова, которые оканчиваются на букву 'к'? - Pascal ABC - Ответ 8834915

03.03.2016, 22:25. Показов 1312. Ответов 2
Метки (Все метки)

Лучший ответ Сообщение было отмечено dan4i как решение

Решение

Т.к. в образце условие немного отличается, то:
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
program z1674519;
var i,k:integer;
    s:string;
begin
 cls;
 writeln('Введите строку:');
 readln(s);
 k:=0;
 for i:=1 to length(s)-1 do
  if (s[i]='к')and ((s[i+1]=' ') or (s[i+1]='.'))
   then k:=k+1;
 writeln('В строке ',k,' слов(а/о) оканчивается буквой "к"');
end.


Вернуться к обсуждению:
Определить сколько раз в строке встречаются слова, которые оканчиваются на букву 'к'? Pascal ABC
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
03.03.2016, 22:25
Готовые ответы и решения:

Удалить в строке слова, которые встречаются в ней указанное число раз
здравствуйте, необходимо срочно решить следующую задачу: удалить в строке слова, которые...

Определить сколько раз стоящие рядом два слова заканчиваются на одну и ту же букву
предложение состоит из слов, между словами произвольное число пробелов. пробелы могут быть перед...

Определить сколько раз в последовательности встречаются максимальное чисел, а сколько раз минимальное
Добрый вечер всем! Мне надо решить на экзамен задачку, прошу вас помочь с ней :) Задача: Дана...

Текст, содержащий все слова исходного текста, которые оканчиваются на ту же букву, что и слово максимальной длины
Создать новый текст, содержащий все слова исходного текста, которые оканчиваются на ту же букву,...

2
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
03.03.2016, 22:25
Помогаю со студенческими работами здесь

Найти в строке те слова, которые начинаются и оканчиваются одной и той же буквой.
Задача 1 Дана строка. Найти в ней те слова, которые начинаются и оканчиваются одной и той же...

Напечатать слова, которые встречаются в предложениях только 1 раз
Ребята! Такая задача - Даны 2 предложения.Напечатать слова, которые встречаются в предложениях...

Напечатать те слова, которые встречаются в тексте один раз
дано предложение.напечатать те слова которые встречаются в нем один раз. Добавлено через 12...

Подсчитать сколько раз в заданной строке встречаются символы ‘a’ и ‘1’
Помогите плиз((( 1.Дана символьная строка S. Скопировать посимвольно ее в другую символьную...

0
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2023, CyberForum.ru