Статистика
Всего в нашей базе более 4 327 663 вопросов и 6 445 976 ответов!

Составьте программу ,которая:считает, сколько раз в тексте, заданном с клавиатуры, встречается буква «М».решение паскаль через цикл

10-11 класс

Directioner112132629 18 февр. 2017 г., 8:38:18 (7 лет назад)
Рейтинг
+ 0 -
0 Жалоба
+ 0 -
AnjaKeller
18 февр. 2017 г., 9:34:51 (7 лет назад)

program primer;
var st1,st:string;
a,b:integer;
begin
write('введите текст ,в конце ввода нажмите enter'); writeln;
read(st);
for a:=1 to length(st) do begin
st1:=copy(st,a,1);
if st1='М' then
inc(b)
else if st1='м' then
inc(b)
else;
end;
write(b);

end.

Ответить

Другие вопросы из категории

Составить приложение на языке Pascal.

Вариант задания выбирается по последней цифре зачетной книжке.
По заданным расчетным формулам и наборам исходных данных,
указанных в таблице, вычислить на ПК значения соответствующих
переменных. На печать вывести значения вводимых исходных данных и
результаты расчетов, сопровождая их вывод именами выводимых
переменных.

Читайте также

Напишите прог-у на паскале... ПЛИИИИИИИИИИЗ 1)даны действительные числа a1, b1, c1, a2, b2, c2. Составьте программу, которая находит координаты точки

пересечения прямых, описываемых уравнениями a1x+b1x=c1 и a2x+b2x=c2. Если прямые пересекаются или не существуют-выдать соответствующее сообщение. 2) даны действительные числа a1, b1, a2, b2. Составьте программу, которая определяет, какая из точек A(a1;b1) или B(a2;b2) лежит на прямой у=2х+1. Если такой точки нет-вывести соответсвующее сообщение.

1.составить программу которая в введенном тексте удаляет пробелы 2.составить программу которая в ведённом тексте после пробелов ставит две буквы

к

3.составить прогу которая находит индекс последней запятой в введенном тексте

1.Составить программу, которая увеличивает каждый элемент настоящей таблице х [1 .. 10] на 1. 2. составить программу, замены положительных

элементов настоящей таблице х [1 .. 10] на 0.

3.составить программу, замены отрицательного элементов настоящей таблице х [1 .. 10] на их квадрат.

4.составить прогрумму, которая увеличивает на 2 все элементы настоящей таблице х [1 .. 10], которые больше 10.



Вы находитесь на странице вопроса "Составьте программу ,которая:считает, сколько раз в тексте, заданном с клавиатуры, встречается буква «М».решение паскаль через цикл", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.