сервис вопросов и ответов1.С клавиатуры вводят слово и символ.Составьте программу ,которая определяет позицию данного символа.
5-9 класс|
|
Kira147
06 янв. 2017 г., 21:47:41 (7 лет назад)
Aigul777f
06 янв. 2017 г., 22:32:19 (7 лет назад)
Var c: Char;
s: String;
i,k,p: Integer;
Begin
ReadLn(c); {Чтение заданного символа}
ReadLn(s); {Чтение заданного слова}
p:= Pos(c,s); {Определяем позицию символа}
If (p=0) Then {Функция вернёт 0, если символ не будет найден}
WriteLn('Такого символа в слове нет.')
Else {Если символ есть, то ...}
Begin
WriteLn('Указанный символ расположен на позиции: ',p);
k:= 0; {k хранит количество вхождений}
p:= Length(s); {p хранит длину строки(слова)}
For i:=1 To p Do {Пробегаем по всем символам слова}
If (s[i]=c) Then inc(k); {Если символ совпадает, увеличиваем на 1 переменную k}
WriteLn('Количество вхождений данного символа: ',k);
End;
End.
Ответить
Другие вопросы из категории
Дан массив из 20 элементов, заполненный случайными числами в диапазоне от – 10 до +10. Поменять местами элементы, стоящие на четных и нечетных местах и
вывести на экран.
Зная, что каждая буква исходного текста заменяется третьей после неё буквой в алфавите русского языка, который считается записанным по кругу, декодируйте
следующий сообщение:
а)жуцёг льл, г ргмжиыя - дзузёл;
б)фхгуюм жуцё оцъыз рсеюш жецш.
Читайте также
составьте программу, которая вставляет слово ОБА после каждого слова, заканчивающегося на гласную.
Или
составьте программу, которая определяет на сколько в строке S слов, начинающихся на главную букву больше, чем в строке T
надо решить одну из них
1.Составить программу, которая определяет номера позиций символа","
2. Составить программу, которая позволяет заменить все гласные символом "*"
1.Дано целое число составить программу которая определяет оканчивающие данное число цифрой семь.
2.Дано 2х значное число составить программу с помощью которой можно отпределить входит ли в это число цифра шесть.
Помогите составить программу по информатике в Pascal ABC. Задание 1. С клавиатуры одной строковой вводят имя и фамилию. Составьте программу, которая:
а) определяет, есть ли в определенной строке заданный символ; б) копирует в новую строку имя и выводит его; в) выводит сначала фамилию, а затем имя. Задание 2. Составьте программу, которая в строке "Касіу Ясь канюшыну" заменяет имя "Ясь" на "Янка". Задание 3. Составьте программу, которая в строке "реки горы и болота": а) удаляет слово "горы"; б) Заменяет слово "болота" на "озера". Буду безмерно благодарна!!!
Вы находитесь на странице вопроса "1.С клавиатуры вводят слово и символ.Составьте программу ,которая определяет позицию данного символа.", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.