Помощь - Поиск - Пользователи - Календарь
Полная версия: 3 задачи на строки
Форум «Всё о Паскале» > Pascal, Object Pascal > Задачи
False
...
Айра
Используй функцию POS(st1,st2) - она находит первое появление в строке st2 строки st1. Результатом будет номер позиции (тип целочисленный), где начинается st1. Если st1 в st2 нет, то результат будет равен 0.
мисс_граффити
Цитата
Написать программу, которая вводит с клавиатуры строку

Если напишешь такую программу - покажи, пожалуйста.
А то я умею только так, чтобы с клавиатуры пользователь вводил...

Цитата
Хотелось бы получить по возможности полное решение задач. Прошу прощения, если решения данных задач уже приведены. В таком случае дайте пожалуйста ссылку на решение.

Тебе в конкурсе самых ленивых надо участвовать! Уже даже поиском самому пользоваться неохота....
Айра
Цитата
Написать программу, которая вводит с клавиатуры строку

может в юмор отправим smile.gif (без обид...)
False
...
Айра
По поводу первой:
ищешь с помошью Pos где находятся точки, находишь количества символов между 1 и 2, 2 и 3 и т.д., сравниваешь их и находишь большее.

Во второй тебе нужны только первая и вторая точка (если ее не будет, то придется вычислять длину строки и отнимать от нее кол-во символов до 1-й -> это и будет n), вычисляешь количество символов между ними и спомощью Copy(st,poz,n) выделяешь, начиная с pos(первая точка), n символов, а потом выводишь их.
По-моему, так smile.gif
мисс_граффити
False, значит так: из-за того, что у тебя не один экзамен+ты неправильно распланировал время в течение семестра, остальные должны побросать свои дела (сессия во всех универах страны примерно в одно и то же время) и кидаться искать? а зачем нам это нужно?

Айра, вот тебе - зачем? есть прилепленная тема: Разбиение на слова. Все способы.
неужели не лень ее перепечатывать? или еще предварительно обдумывать, а потом писать?
Айра
Цитата
Айра, вот тебе - зачем? есть прилепленная тема: Разбиение на слова. Все способы.
неужели не лень ее перепечатывать? или еще предварительно обдумывать, а потом писать?

Извиняюсь. Больше не буду. unsure.gif unsure.gif unsure.gif
False
мисс_граффити
Я никого не обязываю. Я просто попросил о помощи.
Это текстовая версия — только основной контент. Для просмотра полной версии этой страницы, пожалуйста, нажмите сюда.