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

Pascal (Паскаль)

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

Работа с множествами. - Pascal

15.05.2010, 16:27. Просмотров 438. Ответов 0
Метки нет (Все метки)

Добрый день, пожалуйста помогите с решением задачи.

Условие:
Вводятся 2 строки и набор чисел. Введенные числа показывают номера выбранных мест в строках. Верно ли, что если из первой строки удалить все символы на выбранных местах, то получится вторая строка.

Задаче вроде бы не сложная, но я что-то не врубаюсь.

Вот что у меня получилось:

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
          Program mnozh18;
Uses crt;
Var s1,s2:string;
    i:integer;
begin
clrscr;
write('vvedite pervyiu stroku: ');
readln(s1);
write('vvedite vtoryiu stroku: ');
readln(s2);
 for i:=1 to length(s1) do
   if s1[i] in ['0','1','2','3','4','5','6','7','8','9'] then
      delete(s1,i,1);
   if s1=s2 then writeln('verno')
    else writeln('neverno');
readkey;
end.
Здесь явно многое неверно. Прошу исправить ошибки.(Заранее спасибо тем кто откликнется на мою просьбу.)
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
15.05.2010, 16:27
Здравствуйте! Я подобрал для вас темы с ответами на вопрос Работа с множествами. (Pascal):

Работа со множествами - Pascal
Вводится непустая строка из строчных русских букв, заканчивающаяся точкой. Отдельные слова в ней разделены запятыми (<= 70 символов)....

Работа с множествами - Pascal
Ребята не могу сообразить что не так. Задача: Даны три множества Х1, Х2, Х3, содержащие целые числа из диапазона 1..100. Известно, что...

Работа со строками и множествами. - Pascal
Здравствуйте.Прошу помощи в решении такой сложной задачки. Введите с клавиатуры предложение в переменную типа строка символов...

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

Операции над множествами - Pascal
Выполнить операции над заданными множествами (A Δ B) ∩ C, где A Δ B = (A U B) \ (A ∩ B) = (A \ B) U (B \ A) реализуя множества ...

Операции над множествами - Pascal
Даны три множества X1, X2, X3, содержащие целые числа из диапазона 100...200. Известно, что мощность каждого из этих множеств равна 10....

0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
15.05.2010, 16:27
Привет! Вот еще темы с ответами:

Приукрасить программу по работе с множествами - Pascal
Написал программу для работы с множествами. Хотелось бы немного приукрасить ее, при этом научиться чему-то новому. Я хотел бы, чтобы в...

Произвести действия над множествами, представленными в виде массивов - Pascal
Создать массивы и выполнить действия (A\oplus B)\cup C вот созданные массивы program aaaa; uses crt;

Реализовать операции над множествами: объединение, пересечение, разность - Pascal
Модуль. Разработать способ представления множеств, содержащих более 255 элементов. Реализовать операции над множествами: объединение,...

Разработать программу вычисления расстояния между заданными множествами - Pascal
Если кто может то был бы рад если б написали код , я вообще плох в етих темах, зарание спасибо. Вот и Само задание: На плоскости...


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

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

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