2 / 2 / 0
Регистрация: 18.06.2011
Сообщений: 48
1

Получить третье слово из неповторяющихся символов, входящих как в первое, так и во второе слова.

06.03.2012, 18:35. Показов 893. Ответов 3
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
ТЕМА СТРОКИ!
Даны два слова. Получить третье слово из неповторяющихся символов, входящих как в первое, так и во второе слова.

Тема ЗАПИСИ!
Ввести информацию по 10 избирателям, определить количество людей, проживающих на улице Красная

ТЕМА МНОЖЕСТВА!
Поиск простых чисел с помощью решета Эратосфена в числовом промежутке [1..N]. (Простым числом называется число, не имеющее делителей, кроме единицы и самого себя.Идея метода "решета Эратосфена" заключается в следующем: сформируем множество М, в которое поместим все числа заданного промежутка. Затем последовательно будем удалять из него элементы, кратные 2, 3, 4, и так далее до целой части числа [N/2], кроме самих этих чисел. После такого "просеивания" в множестве М останутся только простые числа.)
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
06.03.2012, 18:35
Ответы с готовыми решениями:

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

Образовать новое слово из символов, не входящих ни в первое слово, ни во второе
Ребят ,помогите пожалуйста сделать програму! Даны 2 слова;Образовать новое слово ,элементами...

Как найти, сколько раз надо взять первое и второе число, чтобы получить третье
Как найти сколько раз надо взять первое и второе число что-бы получить третье (Все варианты найти)...

Переставить все слова в исходном тексте так, чтобы первое слово стало последним, второе-предпоследним и т.д.
переставить все слова в исходном тексте так, чтобы первое слово стало последним,...

3
2 / 2 / 0
Регистрация: 06.03.2012
Сообщений: 23
06.03.2012, 18:47 2
Тема ЗАПИСИ!
Ввести информацию по 10 избирателям, определить количество людей, проживающих на улице Красная
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
type
  Izberateli = record
    TSecondName, THouse: array[1..100] of string;
  end;
var
  SecondName, House: Izberateli;
  i,n,l: byte;
begin
   writeln('Введите кол-во избирателей ');
   readln(n);
  writeln('Заполните данные о ', n, ' изберателях: ');
  for i:=1 to n do
    begin
      write('Фамилия: ');
       readln(SecondName.TSecondName[i]);
     write('Адрес: ');
       readln(House.THouse[i]);
    end;
  l:=0;
  for i:=1 to n do
    begin
      if House.THouse[i] = 'Красная'
        then
         l:=l+1;
     end;
     write('число избирателей которые проживают по улице Красная = ',l);
end.
0
2 / 2 / 0
Регистрация: 18.06.2011
Сообщений: 48
06.03.2012, 20:31  [ТС] 3
СПАСИБО))))
0
Mobile Software Engineer
Эксперт С++
5381 / 1585 / 956
Регистрация: 23.01.2011
Сообщений: 3,214
06.03.2012, 20:45 4
Цитата Сообщение от Marishka1789 Посмотреть сообщение
ТЕМА МНОЖЕСТВА
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
const
  n = 255;
var
  Simple, Numbers: set of 1..n;
  Num, NextNum, i: integer;
begin
  Numbers:=[2..n];
  Simple:=[1];
  NextNum:=2;
  while Numbers <> [] do
  begin
    Num:=NextNum;
    while Num <= n do
    begin
      exclude(Numbers, Num);
      inc(Num, NextNum);
    end;
    include(Simple, NextNum);
    repeat inc(NextNum);
    until (NextNum in Numbers) or (NextNum > n);
  end;
  writeln('Простые числа от 1 до ', n, ': ');
  for i:=1 to n do
    if (i in Simple) then write(i, ' ');
end.
0
06.03.2012, 20:45
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
06.03.2012, 20:45
Помогаю со студенческими работами здесь

Поменять местами первое и второе слова,третье и четвертое и т.д.
дано предложение. Поменять местами первое и второе слова,третье и четвертое и т.д.Если количество...

Даны два слова (первое длиннее второго). Заменить в первом слове соответствующее количество символов на второе слово.
например вводишь : 12345 678 он должен вывести 67845 var a,b:string; begin

Поменять слова в строке: первое со вторым, второе с третьим, третье с четвертым
Сейчас программа выдает по такому принципу: Поменять слова в сообщении по принципу: первое с n/2+1...

Как реализовать первое, второе, третье нажатие на кнопку
Может switch попробовать реализовать?


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

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

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru