Информатика | 10 - 11 классы
Дана строка символов.
Найти количество слов начинающихся на букву а .
Через паскаль пожалуйста ничего в нем не соображаю а иветешник задолбал.
Составить программу на паскале находящюю самое длинное слово в строке начинающееся на букву А , и выводящуюю количество букв в нём?
Составить программу на паскале находящюю самое длинное слово в строке начинающееся на букву А , и выводящуюю количество букв в нём?
Паскаль?
Паскаль.
Дана строка N символов.
Вывести все слова с удвоенными буквами.
Задание в Паскале?
Задание в Паскале.
Дана строка, найти 3 символ.
Дана строка символов?
Дана строка символов.
Подсчитать количество вхождений буквы "n".
Дана строка?
Дана строка.
Подсчитать количество слов , начинающихся с буквы Б.
Дана строка?
Дана строка.
Если количество символов в ней нечетно , то выведите на экран средний символ строки.
Задача Паскаль.
Дана строка символов?
Дана строка символов.
Найти количество слов, у которых первый последний символы совпадают между собой.
Во введенной строке подсчитайте количество символов " * " и символов "?
Во введенной строке подсчитайте количество символов " * " и символов "!
". Информатика.
Паскаль.
Строки.
Дано предложение - строка?
Дано предложение - строка.
Подсчитать количество слов, начинающихся с буквы 'а' написать программу на паскале.
Как определить количество символов во втором слове введённой строки в паскале?
Как определить количество символов во втором слове введённой строки в паскале?
На этой странице сайта вы найдете ответы на вопрос Дана строка символов?, относящийся к категории Информатика. Сложность вопроса соответствует базовым знаниям учеников 10 - 11 классов. Для получения дополнительной информации найдите другие вопросы, относящимися к данной тематике, с помощью поисковой системы. Или сформулируйте новый вопрос: нажмите кнопку вверху страницы, и задайте нужный запрос с помощью ключевых слов, отвечающих вашим критериям. Общайтесь с посетителями страницы, обсуждайте тему. Возможно, их ответы помогут найти нужную информацию.
Var a : string ;
i : integer ;
begin
readln(a) ;
a : = a + ' ' ;
while length(a)> ; 0 do begin
if a[1] = 'a' then inc(i) ;
delete(a, 1, pos(' ', a)) ;
end ;
writeln(i) ;
end.