Информатика | 10 - 11 классы
Составить программу на паскале находящюю самое длинное слово в строке начинающееся на букву А , и выводящуюю количество букв в нём?
С клавиатуры вводится строка?
С клавиатуры вводится строка.
С новой строки вводится буква.
Составьте программу подсчета количества заданных букв в заданной строке.
Определить, является ли длина введенного слова числом, кратным трем.
Определить, заканчивается ли введенное слово гласной буквой.
Помогите пожалуйста составить программу на ''Pascal ABC'') Дана строка, содержащая текст на русском языке, и некоторая буква?
Помогите пожалуйста составить программу на ''Pascal ABC'') Дана строка, содержащая текст на русском языке, и некоторая буква.
Подсчитать, сколько слов начинается с указанной буквы.
Дана строка символов?
Дана строка символов.
Найти количество слов начинающихся на букву а .
Через паскаль пожалуйста ничего в нем не соображаю а иветешник задолбал.
Дана строка?
Дана строка.
Подсчитать количество слов , начинающихся с буквы Б.
Составить программу, которая считает количество букв "а" в заданном слове?
Составить программу, которая считает количество букв "а" в заданном слове.
В паскаль.
Дана строка ?
Дана строка .
Написать программу для вывода на экран первой буквы строки.
Срочно!
(паскаль).
Составить программу, которая считает количество букв "а" в заданном слове (Секретные материалы)?
Составить программу, которая считает количество букв "а" в заданном слове (Секретные материалы).
В паскаль.
Напишите программу, подсчитывающую количество букв во введенной строке (слове)?
Напишите программу, подсчитывающую количество букв во введенной строке (слове).
Дано предложение - строка?
Дано предложение - строка.
Подсчитать количество слов, начинающихся с буквы 'а' написать программу на паскале.
Подсчитайте количество гласных латинских букв в строке?
Подсчитайте количество гласных латинских букв в строке.
(ПАСКАЛЬ).
Вы открыли страницу вопроса Составить программу на паскале находящюю самое длинное слово в строке начинающееся на букву А , и выводящуюю количество букв в нём?. Он относится к категории Информатика. Уровень сложности вопроса – для учащихся 10 - 11 классов. Удобный и простой интерфейс сайта поможет найти максимально исчерпывающие ответы по интересующей теме. Чтобы получить наиболее развернутый ответ, можно просмотреть другие, похожие вопросы в категории Информатика, воспользовавшись поисковой системой, или ознакомиться с ответами других пользователей. Для расширения границ поиска создайте новый вопрос, используя ключевые слова. Введите его в строку, нажав кнопку вверху.
Var s : string ;
i, n, max : byte ;
begin
n : = 0 ; i : = 1 ; max : = 0 ;
write('Введите s - > ; ') ; readln(s) ;
while i< ; = length(s) do begin
if (i = 1) or (s[i] = ' ') then begin
if i < ; > ; 1 then inc(i) ;
if (i< ; = length(s))and((s[i] = 'a') or (s[i] = 'A')) then
while i< ; = length(s) do
if s[i]< ; > ; ' ' then begin
inc(n) ;
inc(i) ;
end else break ;
end ;
inc(i) ;
if max< ; n then max : = n ;
n : = 0 ;
end ;
write('Длина самаго длинного слова на букву A = ', max) ;
end.