Помогите пожалуйста составить программу на ''Pascal ABC'') Дана строка, содержащая текст на русском языке, и некоторая буква?

Информатика | 10 - 11 классы

Помогите пожалуйста составить программу на ''Pascal ABC'') Дана строка, содержащая текст на русском языке, и некоторая буква.

Подсчитать, сколько слов начинается с указанной буквы.

Ответить на вопрос

Для ответа на вопрос необходимо пройти авторизацию или регистрацию.

Ответы (1)

Knyazyan2002 1 июн. 2020 г., 18:39:01

Var str : string ; i, j : byte ; schr : char ;

begin readln(str) ; / / Вводим строку str : = ' ' + str ; / / Это чтобы не удлинять условие, что ниже readln(schr) ; / / Вводим символ for i : = 2 to length(str) do if ((upcase(str[i]) = upcase(schr)) and (str[i - 1] = ' ')) then inc(j) ; writeln(j) ;

end.

Lenusik190893 17 дек. 2020 г., 08:11:07 | 5 - 9 классы

Помогите сделать в pascal abc?

Помогите сделать в pascal abc.

Дана строка.

Укажите те слова, которые содержат хотя бы одну букву к.

Irka7 25 мая 2020 г., 10:45:46 | 10 - 11 классы

Помогите с Pascal пожалуйста Задача : Подсчитать кол - во вхождений заданной буквы в строку и заменить эту букву на другую?

Помогите с Pascal пожалуйста Задача : Подсчитать кол - во вхождений заданной буквы в строку и заменить эту букву на другую.

Dilya03276 24 февр. 2020 г., 02:57:42 | 5 - 9 классы

Дана строка заканчивающаяся точкой подсчитать сколько в строке слов с тремя буквами PASCAL?

Дана строка заканчивающаяся точкой подсчитать сколько в строке слов с тремя буквами PASCAL.

Кицюня095 23 янв. 2020 г., 07:00:42 | 5 - 9 классы

Дана строка?

Дана строка.

Подсчитать количество слов , начинающихся с буквы Б.

Панда0071 23 мар. 2020 г., 00:42:55 | 10 - 11 классы

Дана строка?

Дана строка.

Указать те слова, которые содержат хотя бы одну букву k.

Помогите составить программу в C#.

Massimka 26 авг. 2020 г., 14:18:08 | 10 - 11 классы

Определить сколько слов в заданной строке начинаются на букву "а"?

Определить сколько слов в заданной строке начинаются на букву "а".

Pascal.

Lalu 29 июн. 2020 г., 10:15:41 | 5 - 9 классы

Составить программу в Pascal ABC которая нарисует светофор и букву Р?

Составить программу в Pascal ABC которая нарисует светофор и букву Р.

Vaynah1 25 мая 2020 г., 02:05:50 | 10 - 11 классы

Помогите пожалуйста написать программу в Паскаль : ) Дан произвольный текст на русском языке?

Помогите пожалуйста написать программу в Паскаль : ) Дан произвольный текст на русском языке.

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

Sesnation 19 авг. 2020 г., 09:04:03 | 5 - 9 классы

Дано предложение - строка?

Дано предложение - строка.

Подсчитать количество слов, начинающихся с буквы 'а' написать программу на паскале.

Paqrf 30 дек. 2020 г., 23:57:29 | 10 - 11 классы

На строки :Дан текст из букв и цифр?

На строки :

Дан текст из букв и цифр.

Заменить все нули в тексте на букву А, а все единицы на букву М.

Подсчитать число замен.

Pascal ABC.

Net type const.

На этой странице сайта, в категории Информатика размещен ответ на вопрос Помогите пожалуйста составить программу на ''Pascal ABC'') Дана строка, содержащая текст на русском языке, и некоторая буква?. По уровню сложности вопрос рассчитан на учащихся 10 - 11 классов. Чтобы получить дополнительную информацию по интересующей теме, воспользуйтесь автоматическим поиском в этой же категории, чтобы ознакомиться с ответами на похожие вопросы. В верхней части страницы расположена кнопка, с помощью которой можно сформулировать новый вопрос, который наиболее полно отвечает критериям поиска. Удобный интерфейс позволяет обсудить интересующую тему с посетителями в комментариях.

Последние ответы

Smoltanya1 2 мая 2024 г., 03:12:04

Ответ : Формула ` = A3 * $B4`, яка скопійована з клітинки C4 у клітинку D5, буде автоматично адаптована до нового контексту. У виразі, `A3` залишиться незмінним, але посилання на `B4` зміниться відповідно до нового місця розташування клітинки. Якщо..

Формулу = A3 * $B4 скопійовано з клітинки С4 у клітинку D5?

Lilichka364 2 мая 2024 г., 02:31:52

Ответ : import turtle t = turtle. Turtle () t. Shape ('turtle') #малюємо обличчя t. Pencolor ('yellow') t. Fillcolor ('yellow') t. Begin_fill () t. Circle (50) t. End_fill () #малюємо ліве око t. Goto ( - 20, 60) t. Fillcolor ('blue') t. Be..

Якщо не важко то перепишіть даю 30 балов?

Катя4635 1 мая 2024 г., 21:54:49

Ответ : a = int(input()) n = 1 s = 0 while a! = 0 : . If a&lt ; 300 : . If a%10 = = 6 and a%6 = = 0 : . S + = a . A = int(input()) . N + = 1 . If n&gt ; 100 : . Break print(s)...

На PYTHON?

Pembo537 1 мая 2024 г., 17:08:07

Ответ : Держи import math a = int(input('Введите сторону квадрата : \ n')) print(f'P = {a * 4}') print(f'S = {a * * 2}') print(f'C = {a * math. Sqrt(2)}') Объяснение :..

Кто шарит в python помогите написаить одну маленькую программу (чтобы потом вывводилась как на приме

Кэт181 1 мая 2024 г., 16:51:35

1) I = m * n * j I = 640 * 512 * 16 = 5242880 5242880бит = 655360байт = 640Кбайт 2) хз...

1) Размер шестнадцатицветного изображения 640х512 пикселей?

Armankozha 1 мая 2024 г., 06:58:41

X = int(input('x = ')) s = [pow(x, i) for i in range(int(input('N = ')))] print(s)...

Используя генератор, составьте список S, заполненный степенями числа X от 0 до N−1 и распечатайте ег

Algebra0007 1 мая 2024 г., 06:00:15

Ответ : c возможно Объяснение :..

Обеспечение доступа к данным на основе распределения прав доступаa) Конфиденциальностьb) Целостность

Condratjevmaksi 1 мая 2024 г., 05:22:55

Ответ : программирование программирование это язык на котором пишется годы из этих кодов создаются сайты языки программирование программирование бывают разныене все язык java small basic CSS + и многие другие благодаря CSS + пишутпишут сайты создаютс..

Напишите эссе на тему : чем отличаются понятия "система программирования" и "язык программирования"П

ГайДина66 1 мая 2024 г., 02:54:08

Ответ : 14ш84 объяснение : 44н Недостаток : Это ошибка, если база данных жёсткого диска устарела, нужно обновить жёсткий диск. Если не получается то это просто док текст...

Представьте себе что при каждой сортировке программа изменяла бы расположение данных на диске Какие

Jenni67 1 мая 2024 г., 00:47:36

Ответ : Команда size визначає розмір кроку, який використовується в команді forward(siz). Якщо size = 30, то крок буде дорівнювати 30 одиницям. Якщо ми змінимо size на 100, то крок збільшиться більш ніж в три рази. Объяснение :..

Подумай size = 30 forward(siz) Як зміниться малюнок якщо size = 100?