Информатика | 10 - 11 классы
Помогите написать программу на паскале!
Выбрать из текста слова в которых первая буква совпадает с последней, слова в тексте разделены пробелами.
Напишите программу для вывода на экран последовательности символов : ABBCCCDDDD…ZZZZZZZZZZZZZZZZZZZZZZZZZZ Напишите программу, которая выводит «Да», если буква «а» встречается в тексте чаще, чем буква?
Напишите программу для вывода на экран последовательности символов : ABBCCCDDDD…ZZZZZZZZZZZZZZZZZZZZZZZZZZ Напишите программу, которая выводит «Да», если буква «а» встречается в тексте чаще, чем буква «о», и «Нет» в обратном случае.
Поменяйте местами k первых и k последних символов строки.
Удвойте вхождение буквы в текст.
Например, если пользователь ввёл текст «мама мыла раму» и выбрал для удвоения букву «м», то после работы программы должно быть выведено на экран сообщение «ммамма ммыла рамму» Проверьте написанный текст на правильность написания сочетаний «жи», «ши».
Если слова написаны с ошибкой – исправьте их.
Удалите в каждом слове предложения первую и последнюю букву.
Написать программу которая запрашивает два слова а и б одинаковой длины и формирует новое слово в котором буквы первого чередуется с буквами второго?
Написать программу которая запрашивает два слова а и б одинаковой длины и формирует новое слово в котором буквы первого чередуется с буквами второго.
В паскале *
ПОМОГИТЕ ПОЖАЛУЙСТАААА.
1. составить программу которая в введенном тексте удаляет пробелы 2?
1. составить программу которая в введенном тексте удаляет пробелы 2.
Составить программу которая в ведённом тексте после пробелов ставит две буквы к 3.
Составить прогу которая находит индекс последней запятой в введенном тексте.
1. С клавиатуры вводится слово, распечатать все его буквы через пробел?
1. С клавиатуры вводится слово, распечатать все его буквы через пробел.
(после последней буквы пробела быть не должно).
2. Написать программу, которая удаляет первое слово из строки введенной с клавиатуры и вместо него вставляет заданное.
Написать программу в паскале которая вставит между буквами введенного слова пробел?
Написать программу в паскале которая вставит между буквами введенного слова пробел.
Написать программу в паскале : Дана строка текста?
Написать программу в паскале : Дана строка текста.
Слова в тексте друг от друга отделяются одним пробелом.
Удалить из строки все слова, начинающиеся и заканчивающиеся на "о".
Написать программу в Паскале?
Написать программу в Паскале.
Предложение состоит из слов, между словами один пробел, а после последнего слова точка.
Найти длину самого длинного слова.
Нахождение самого длинного слова в тексте?
Нахождение самого длинного слова в тексте.
Найти самое длинное слово в тексте.
Если таких слов несколько, то взять последнее.
Написать на Паскале.
Помогите пожалуйста написать программу в Паскаль : ) Дан произвольный текст на русском языке?
Помогите пожалуйста написать программу в Паскаль : ) Дан произвольный текст на русском языке.
Написать программу, которая выводит слова, начинающиеся с гласной буквы и содержащие не менее двух согласных.
Написать программу в паскальВвести текст состоящий из слов , разделённых между собой запятыми?
Написать программу в паскаль
Ввести текст состоящий из слов , разделённых между собой запятыми.
Сколько раз в тексте встречается слова "Мама" В найденных словах изменить букву "М" на букву "П"
Так же нужно прописать программу простую и понятную по синтаксису.
Вы находитесь на странице вопроса Помогите написать программу на паскале? из категории Информатика. Уровень сложности вопроса рассчитан на учащихся 10 - 11 классов. На странице можно узнать правильный ответ, сверить его со своим вариантом и обсудить возможные версии с другими пользователями сайта посредством обратной связи. Если ответ вызывает сомнения или покажется вам неполным, для проверки найдите ответы на аналогичные вопросы по теме в этой же категории, или создайте новый вопрос, используя ключевые слова: введите вопрос в поисковую строку, нажав кнопку в верхней части страницы.
/ / PascalABC.
NET 3.
1, сборка 1250 от 28.
05. 2016
begin var s : = ReadlnString('Введите текст : ') ; Writeln('Слова, в которых совпадают первая и последняя буквы : ') ; s.
ToWords.
Where(x - > ; x[1] = x[x.
Length]).
Println(NewLine)
end.
Тестовое решение
Введите текст : космос азбука баобаб импульс озеро довод конец
Слова, в которых совпадают первая и последняя буквы :
азбука
баобаб
озеро
довод.
/ / Free Pascal 2.
6. 4
uses strutils ;
var s, t : string ; i : integer ;
begin write('Введите текст : ') ; readln(s) ; writeln('Найденные слова : ') ; for i : = 1 to WordCount(s, StdWordDelims) do begin t : = ExtractWord(i, s, StdWordDelims) ; if t[1] = t[length(t)] then writeln(t) ; end ; readln ;
end.