Форум программистов, компьютерный форум, киберфорум
Наши страницы
Pascal ABC
Войти
Регистрация
Восстановить пароль
 
zhanara-5693
0 / 0 / 0
Регистрация: 10.12.2015
Сообщений: 2
#1

Даны две строки s и t, определите длину наибольшей строки, которая встречается в обеих - Pascal ABC

10.12.2015, 07:11. Просмотров 1313. Ответов 1
Метки нет (Все метки)

Даны две строки s и t, определите длину наибольшей строки, которая встречается в обеих
Формат входных данных
http://www.cyberforum.ru/pascal/thread1608564.html
Первая строка входных данных содержит строку s, вторая содержит строку t. Обе строки состоят только из строчных латинских букв. 1<=длина строк<=1 000.
Формат выходных данных:
Выведите ответ к задаче!
0
Лучшие ответы (1)
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
10.12.2015, 07:11
Я подобрал для вас темы с готовыми решениями и ответами на вопрос Даны две строки s и t, определите длину наибольшей строки, которая встречается в обеих (Pascal ABC):

Определите длину наибольшей строки, которая встречается в обеих заданных строках
Задача A Вам даны две строки s и t, определите длину наибольшей строки,...

Даны две строки Определите, содержится ли меньшая по длине строка в большей
Даны две строки. Определите, содержится ли меньшая по длине строка в большей ...

Множества.Даны две строки. Напечатать те символы, которые входят в первую но не во вторую строки
Помогите решить:) Можно только циклы,остальное сделаю сам. Даны две строки....

Даны две строки. Из множества символов первой строки удалить символы содержащиеся во второй строке.
составить программу для решения задач: 6. Даны две строки. Из множества...

Даны две строки: S1 и S2. Удалить из строки S1 последнюю подстроку, совпадающую с S2. Если таких подстрок нет, то вывести S1 без изменений
Вот условие: Даны две строки: S1 и S2. Удалить из строки S1 последнюю...

1
APALoff
1638 / 1067 / 1080
Регистрация: 03.07.2013
Сообщений: 4,507
10.12.2015, 10:30 #2
Лучший ответ Сообщение было отмечено zhanara-5693 как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Var
  s,t : String;
  i,j  : Integer;
Begin
  Readln(s);
  Readln(t);
  For i:=Length(s) downto 1 do
   For j:=1 to Length(t)-i+1 do
     If Pos(Copy(s,j,i),t)>0 then
     Begin
       Writeln('Общая строка максимальной длины: ',Copy(s,j,i));
       Halt(0);
     end;
  Writeln('Нет общей подстроки.');
end.
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
10.12.2015, 10:30
Привет! Вот еще темы с решениями:

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

даны две строки
помогите пожалуйста решить Даны две строки символов s1 и s2 выяснить верно...

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

Даны две строки: S1 и S2. Проверить, содержится ли строка S2 в строке S1
Даны две строки: S1 и S2. Проверить, содержится ли строка S2 в строке S1. Если...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru