ANTICHAT — форум по информационной безопасности, OSINT и технологиям
ANTICHAT — русскоязычное сообщество по безопасности, OSINT и программированию.
Форум ранее работал на доменах antichat.ru, antichat.com и antichat.club,
и теперь снова доступен на новом адресе —
forum.antichat.xyz.
Форум восстановлен и продолжает развитие: доступны архивные темы, добавляются новые обсуждения и материалы.
⚠️ Старые аккаунты восстановить невозможно — необходимо зарегистрироваться заново.
01.03.2010, 23:27
|
|
Участник форума
Регистрация: 06.07.2005
Сообщений: 115
Провел на форуме:
959535
Репутация:
40
|
|
Паскалька...
Задача: В символьной строке определить все слова, которые начинаются и заканчиваются одинаковым символом. Через функцию
Она через процедуру
program p20;
uses crt;
var a:string;
procedure he(b:string);
var
i:integer;
f:boolean;
a1,a2:integer;
begin
f:=false;
for i:=1 to length(a) do
begin
if (a[i]<>' ') and (not f) then
begin
f:=true;
a1:=i;
end;
if (a[i]=' ') and (f) then
begin
f:=false;
a2:=i;
if (copy(a,a1,1)=copy(a,a2-1,1)) then
writeln(copy(a,a1,a2-a1));
end;
end;
end;
begin
clrscr;
write('Vvedite stroky (Enter - gotovaya stroka):'); readln(a);
if a='' then a:='ABBA it`s then !!!best!!! pop group!';
writeln('---'); writeln(a);
writeln('---'); TextColor(15); he(a);
end.
Вторая
Если в введенном слове первый и последний символы совпадают, то переменной t присвоить значение true, иначе false. То же Функция
Нужно что бы через функцию.
Последний раз редактировалось nec; 01.03.2010 в 23:50..
|
|
|
02.03.2010, 07:33
|
|
Новичок
Регистрация: 30.11.2008
Сообщений: 15
Провел на форуме:
115871
Репутация:
16
|
|
2 4p3
необязательно 5 слов, это я для примера взял, нужно, чтобы программа в любом тексте находила повторяющиеся слова, и выводила их в порядке убывания частоты повторения. сорри за быдлокод  |
|
|
|
02.03.2010, 12:46
|
|
Участник форума
Регистрация: 18.08.2008
Сообщений: 159
Провел на форуме:
750247
Репутация:
92
|
|
Сообщение от Napas
2 4p3
необязательно 5 слов, это я для примера взял, нужно, чтобы программа в любом тексте находила повторяющиеся слова, и выводила их в порядке убывания частоты повторения. сорри за быдлокод Код на С++ приемлем?
|
|
|
|
02.03.2010, 11:38
|
|
Участник форума
Регистрация: 26.05.2007
Сообщений: 191
Провел на форуме:
389326
Репутация:
9
|
|
вывести в порядке убывания - не могу сообразить =(
что именно в порядке выбывания, что-то я не догнал
|
|
|
|
02.03.2010, 12:23
|
|
Участник форума
Регистрация: 07.02.2010
Сообщений: 189
Провел на форуме:
870084
Репутация:
79
|
|
SHARA, повторяющиеся слова.
|
|
|
|
02.03.2010, 12:54
|
|
Новичок
Регистрация: 30.11.2008
Сообщений: 15
Провел на форуме:
115871
Репутация:
16
|
|
ога, буду очень благодарен =)
|
|
|
|
02.03.2010, 16:13
|
|
Участник форума
Регистрация: 18.08.2008
Сообщений: 159
Провел на форуме:
750247
Репутация:
92
|
|
Сообщение от Napas
ога, буду очень благодарен =)
PHP код:
#include <QtCore/QCoreApplication> // консольное приложение под Qt
#include <iostream> // потоки I/O
#include <algorithm> // функции алгоритмов
#include <cstdlib> // system
#include <string> // строковый класс
#include <vector> // класс контейнера
#include <functional> // Нужны предикаты
#include <map>
using namespace std;
// этот класс отсортирует нам массив по частотам
class sorting_by_freq: public binary_function<string,string,bool>
{
map<string,int> &m;
public:
sorting_by_freq(map<string,int> &x) : m(x) {};
bool operator()(const string &x, const string&y) const
{
return m[x] > m[y];
}
};
int main(int argc, char *argv[])
{
QCoreApplication a(argc, argv); // вызываем консоль
vector<string> vec; // объявляем контейнер строк. Двумерный массив.
// Тестовые данные в разном порядке
vec.push_back("lol");
vec.push_back("over");
vec.push_back("lol");
vec.push_back("lol");
vec.push_back("over");
vec.push_back("hello");
// Для начала сортируем вектор
sort(vec.begin(), vec.end(), std::less<string>());
// Нужно выделить уникальные элементы, сделаем в другом векторе
vector<string> holder;
holder = vec;
// Находим уникальные, удаляем повторения
holder.erase(unique(holder.begin(), holder.end()), holder.end());
// Поглядим, что у нас в holder храниться
for (unsigned int i = 0;i < holder.size();++i)
cout << holder[i] << endl;
// Начинаем считать частоты. Определим массив типа (слово) -> (количество вхождений)
map<string, int> m;
for (unsigned int i = 0;i < holder.size();++i)
m[holder[i]] = count(vec.begin(), vec.end(), holder[i]);
// сортируем слова по частотам, третий параметр - условие сортировки
sort(vec.begin(), vec.end(), sorting_by_freq(m));
// выводим
for (unsigned i = 0;i < vec.size();++i)
cout << vec[i] << endl;
// пауза
system("pause");
return 0; // уходим
}
Последний раз редактировалось 4p3; 02.03.2010 в 16:15..
|
|
|
|
02.03.2010, 22:02
|
|
Новичок
Регистрация: 24.03.2009
Сообщений: 18
Провел на форуме:
147876
Репутация:
12
|
|
Ребят, сложновато для меня((
Помогите написать программу на Си для Вычисления абсолютной и относительной погрешности
Очень нужно. Спасибо заранее
|
|
|
|
02.03.2010, 22:18
|
|
Новичок
Регистрация: 24.03.2009
Сообщений: 18
Провел на форуме:
147876
Репутация:
12
|
|
Ребят, нужно срочно, помогите плиз)
|
|
|
|
02.03.2010, 22:30
|
|
Новичок
Регистрация: 24.03.2009
Сообщений: 18
Провел на форуме:
147876
Репутация:
12
|
|
да
|
|
|
|
|
 |
|
|
Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
|
|
|
|
Похожие темы
Комбинированный вид
