Форум программистов, компьютерный форум, киберфорум
Наши страницы

Pascal (Паскаль)

Войти
Регистрация
Восстановить пароль
 
Dimasik777
0 / 0 / 0
Регистрация: 15.10.2009
Сообщений: 44
#1

Запись и множества - Pascal

29.11.2009, 10:00. Просмотров 602. Ответов 4
Метки нет (Все метки)

Помогите пожалуйста, ничего не понимаю в программировании. Нужно написать проги в Паскале, желательно всю прогу, а не только тело. Буду Вам очень благодарен.

Задания:
1. Даны две строки: S1 и S2. Проверить, содержится ли строка S2 в строке S1. Если да, то вывести номер позиции, начиная с которой S2 содержится в S1, если нет, то вывести 0.
2. Даны две строки: S1 и S2. Определить количество вхождений строки S2 в строку S1.
3. Дана строка S и символ С. Удвоить каждое вхождение символа С в строку S.
4. Дан текст из строчных латинских букв, за которым следует точка. Напечатать: - первые вхождения букв в текст, сохраняя их взаимный исходный порядок;
- все буквы, входящие в текст не менее двух раз;
- все буквы, входящие в текст по одному разу.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
29.11.2009, 10:00
Здравствуйте! Я подобрал для вас темы с ответами на вопрос Запись и множества (Pascal):

Запись и множества - Pascal
Помогите пожалуйста, ничего не понимаю в программировании. Нужно написать проги в Паскале, желательно всю прогу, а не только тело. Буду Вам...

Строки,запись,множества - Pascal
Затра последняя пара, а есчё 3х лаб не хватает для зачета...помагите пожалуйста!!! 1)Дана строка.Преобразовать ее, удалив каждый символ *...

Множества: напечатать по возрастанию цифры, не входящие в запись данного числа - Pascal
напечатать в возрастающем порядке все цифры,не входящие в запись данного натурального числа! пожулйста помогите!зачет горит!

Сформировать множество цифр, входящих в запись данного N. Подсчитать число элементов полученного множества - Pascal
Помогите пожалуйста сделать программу, на Pascal.:cry: Составить программу для формирования множества цифр, входящих в запись данного...

Сформировать множества А и В по заданному числу элементов для каждого множества - Pascal
2)Сформировать множества А и В, базовый тип которых -70..30, по заданному числу элементов для каждого множества. Найти наибольший элемент,...

Множества. Из множества латинских букв выделить множество символов, не входящих в ваше имя - Pascal
из множества латинских букв выделить множество состоящее из символов не входящих в множество символов составляющее ваше имя. вывести это...

4
кот Бегемот
Платежеспособный зверь
8220 / 3792 / 700
Регистрация: 28.10.2009
Сообщений: 9,709
29.11.2009, 10:10 #2
Цитата Сообщение от Dimasik777 Посмотреть сообщение
1. Даны две строки: S1 и S2. Проверить, содержится ли строка S2 в строке S1. Если да, то вывести номер позиции, начиная с которой S2 содержится в S1, если нет, то вывести 0.

Pascal
1
2
3
4
5
6
7
var
s1,s2:string;
begin
readln(s1);
readln(s2);
writeln(pos (s2,s1));
end.
Добавлено через 4 минуты
Цитата Сообщение от Dimasik777 Посмотреть сообщение
2. Даны две строки: S1 и S2. Определить количество вхождений строки S2 в строку S1.
Pascal
1
2
3
4
5
6
7
8
9
10
var
s1,s2:string;
i,kol:integer;
begin
readln(s1);
readln(s2);
for i:=1 to length(s1)-length(s2)+1 do
if copy(s1,i,length(s2))=s2 then inc (kol);
writeln(kol);
end.
1
maladoy
112 / 84 / 12
Регистрация: 09.01.2009
Сообщений: 209
29.11.2009, 10:14 #3
3
Код
s1:=''
for i:=1 to length(s) do
if s[i]<>с then s1:=s1+s[i]
else s1:=s1+c+c;
s:=s1;
writeln(s)
1
кот Бегемот
Платежеспособный зверь
8220 / 3792 / 700
Регистрация: 28.10.2009
Сообщений: 9,709
29.11.2009, 10:14 #4
Pascal
1
3. Дана строка S и символ С. Удвоить каждое вхождение символа С в строку S.
Pascal
1
2
3
4
5
6
7
8
9
10
11
var
s:string;
c:char;
i:integer;
begin
readln(s);
readln(c);
for i:=length(s) downto 1 do
if s[i]=c then insert(c,s,i+1);
writeln(s);
end.
maladoy читай внимательнее условие: не удалить, а удвоить!
1
maladoy
112 / 84 / 12
Регистрация: 09.01.2009
Сообщений: 209
29.11.2009, 10:22 #5
alexevt, исправил
0
29.11.2009, 10:22
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
29.11.2009, 10:22
Привет! Вот еще темы с ответами:

Множества: Задано множество целых чисел C. Создать два множества, содержащие числа больше 5 и меньше 5. - Pascal
Задано множество целых чисел C. Создать два множества, содержащие числа больше 5 и меньше 5. Добавлено через 16 минут Прошу Вас...

Сформировать два множества, первое из которых содержит все простые числа из данного множества, а второе все составные - Pascal
Имеется множество, содержащее натуральные числа из некоторого диапазона. Сформировать два множества, первое из которых содержит все простые...

Даны два множества М и N, состоящие из 10 целых чисел из диапазона 1.100. Из данных множеств выделить соответственно под-множества М1 чисел - Pascal
Даны два множества М и N, состоящие из 10 целых чисел из диапазона 1..100. Из данных множеств выделить соответственно под-множества М1...

Образовать множество, которое бы содержало один из элементов множества A и один из элементов множества числа B - Pascal
кто знает как решить Даны множества A; B. Образовать множество, которое бы содержало один из элементов множества A и один из элементов...


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

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

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