Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
Другие темы раздела
Pascal ABC Создать два новых стека, переместив в первый из них все элементы исходного стека с чётными значениями, а второй - с нечётными https://www.cyberforum.ru/ pascalabc/ thread879563.html
Дан указатель P1 на вершину непустого стека. Создать два новых стека, переместив в первый из них все элементы исходного стека с чётными значениями, а второй - с нечётными (элементы в новых стеках будут располагаться в порядке, обратном исходному; один из этих стеков может оказаться пустым). Вывести адреса вершин полученных стеков (для пустого стека вывести nil). Операции выделения и освобождения...
Составить программу и вычислить значение функции Pascal ABC
Составить программу и вычислить значение функции y. (procedure) y=\frac{1}{abx} x=2, a=x^4+2x^3-3x^2+x+5; b=2x^4+5x^3+3x^2+2x+1; Составить программу вычисления значения функции для заданных a,b.
Pascal ABC Циклические алгоритмы: Не используя стандартные функции, вычислить сумму n первых слагаемых pяда Дано действительное число x. Не используя стандартные функции (за исключением abs и sin), вычислить сумму n первых слагаемых следующего pяда (x вводятся с клавиатуры). Помогите, пожалуйста... https://www.cyberforum.ru/ pascalabc/ thread879540.html Pascal ABC Составьте программу, вычисляющую значение функции https://www.cyberforum.ru/ pascalabc/ thread879533.html
Составьте программу, вычисляющую значение функции. y(a,b)=1+sin(a)+f(a,b)/f(3,5), где f\left=\sum_{k=1}^{5}\left(x/x-y\right)^k
Pascal ABC Найти такое число Фибоначчи, которое больше заданного числа Z
Вычисление каждого числа Фибоначчи оформить в виде процедуры
Pascal ABC Вычислить суммы элементов каждой строки матрицы и определить наибольшую из вычисленных сумм Обработать матрицу, элементами которой являются случайные значения функции f(x)=x2-8; x . Вывести на печать исходную матрицу и полученные результаты. Дана матрица D (10, 11). Вычислить суммы элементов каждой строки матрицы и определить наибольшую из вычисленных сумм https://www.cyberforum.ru/ pascalabc/ thread879418.html
Pascal ABC Определить число элементов главной диагонали квадратной матрицы, меньших k пожа https://www.cyberforum.ru/ pascalabc/ thread879406.html Подсчитать количество букв "а" в последнем слове данной последовательности Pascal ABC
1. Даны натуральное число n, символы S1, S2, ..., Sn. Группы символов, разделённых пробелами (одним или несколькими) и не содержащим пробелов внутри себя будем называть словами. а) подсчитать количество букв "а" в последнем слове данной последовательности. б) найти количество слов, начинающихся с буквы "с". помогите пожалуйста(( НаталиЭлен, по правилам форума один вопрос - одна тема....
Pascal ABC Разделить элементы К-й строки на диагональный элемент расположенный в этой строке https://www.cyberforum.ru/ pascalabc/ thread879305.html
Заданы матрицы размером 5x5 и число К.Разделить элементы К-й строки на диагональный элемент расположенный в этой строке.Заданную квадратную матрицу преобразовать используя умножение строки на число и сложение строк,таким образом,чтобы все элементы первого столбца обратились в нуль кроме элемента,расположенного на главной диагонали. Найти произведение двух заданных матриц.
Pascal ABC Дан одномерный массив, который содержит не более 60 символов.Эти символы образуют некоторые слова https://www.cyberforum.ru/ pascalabc/ thread879295.html
Дан одномерный массив, который содержит не более 60 символов. Эти символы образуют некоторые слова, разделенные одним пробелом. Вывести каждое слово отдельно (т.е. вывести слова в столбик). Помогите пожалуйста
Pascal ABC Создание подпрограммы для сохранения исходных данных и результатов вычислений
Задание: а) Участок опробования - квадрат со координатами центра (А,В), длина стороны квадрата - (С), стороны квадрата совпадают с направлением осей координат; участок опробован N пробами, каждая проба задана координатами (Xi,Yi) и содержанием Qi. Определить количество точек, принадлежащих участку опробования, среднее арифметическое. б) Создать подпрограмму для сохранения исходных данных (N...
Pascal ABC Построить типизированный файл данных, который состоит из записей с такими полями: https://www.cyberforum.ru/ pascalabc/ thread879235.html
Построить типизированный файл данных, который состоит из записей с такими полями: фамилия ученика, имя ученика, номер класса, буква класса. Вывести на экран фамилии учеников с одинаковыми именами. Пожалуйста помогите
3030 / 1916 / 1649
Регистрация: 30.04.2011
Сообщений: 3,060
26.05.2013, 19:37 0

Разработать программу, которая определяет номера слов, в которых содержится буква а - Pascal ABC - Ответ 4619944

26.05.2013, 19:37. Показов 788. Ответов 3
Метки (Все метки)

Ответ

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
Var
  s: String;
  k: Byte;
BEGIN
Writeln('Введите текст: ');
Readln(s);
While s[1]=' ' do
Delete(s,1,1);
While Pos('  ',s)>0 do
Delete(s,Pos('  ',s),1);
While s[Length(s)]=' ' do
Delete(s,Length(s),1);
s:=s+' ';
k:=0;
Writeln('Номера слов, в которых есть буква "a" (латинская): ');
Repeat
  k:=k+1;
  If Pos('a',Copy(s,1,Pos(' ',s)))<>0 Then
  Writeln(k);
  Delete(s,1,Pos(' ',s));
until s='';
END.


Вернуться к обсуждению:
Разработать программу, которая определяет номера слов, в которых содержится буква а Pascal ABC
1
Заказать работу у эксперта
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
26.05.2013, 19:37
Готовые ответы и решения:

Написать программу, которая определяет номера строк двумерного массива A[1.6,1.4], в которых содержится один нулевой элемент
Написать программу, которая определяет номера строк двумерного массива A, в которых содержится один...

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

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

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

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

Написать программу, которая определяет сколько полных минут и секунд содержится в Х секундах
Написать программу, которая определяет сколько полных минут и секунд содержится в Х секундах

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

Разработать программу которая определяет является ли число кратное трем
разработать программу которая определяет является ли чило кратное трем

Разработать программу, которая в интервале от N1 до N2 определяет все числа являющиеся «перевертышами»
Разработать программу, которая в интервале от N1 до N2 определяет все числа являющиеся...

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