Есть два больших текстовых файла. В каждом из них среди текста встречается комбинаци AAAAимяBBBB. Внутри одного файла каждое имя уникально. Из первого в третий, а из второго в четвёртый надо выписать все имена, в формате без AAAA и BBBB, каждое имя в новой строчке. Далее в пятый файл надо записать все имена, которые есть в третьем, но нет в четвёртом. А в шестой - которые есть в четвёртом, но нет в третьем. Задачу надо решить максимально простым способом используя лишь средства Microsoft Windows и Office, в крайнем случае С++.
Спасибо.
Другие языки программирования и технологии
Добрый день. Задача для программистов. Опытному программисту расплюнуть.
Здравствуйте Марианна.
Ваша задача достаточно банальна. Но
1) кода чуть больше, чем экран, смотря каким шрифтом
2) могу предложить на языке "Pascal", скачать среду разработки можно по ссылке http://pascalabc.net/ru/ssyilki-dlya-skachivaniya
Надеюсь мой код Вам подойдёт
const
aa='AAAA';
bb='BBBB';
procedure imena(var f,g:text);
var
s:string;
a,b:integer;
begin
reset(f);
rewrite(g);
while not (Eof(f)) do begin
readln(f,s);
a:=pos(aa,s);
b:=pos(bb,s);
if (a<>0) and (b<>0) then begin
delete(s,b,length(s)-b+1);
delete(s,1,a+length(aa)-1);
writeln(g,s);
end;
end;
close(f);
close(g);
end;
procedure otlich(var f,g,h:text);
var
s,t:string;
begin
reset(f);
rewrite(h);
while not (Eof(f)) do begin
readln(f,s);
reset(g);
while not (Eof(g) or (s=t)) do readln(g,t);
if (s<>t) then writeln(h,s);
close(g);
end;
close(f);
close(h);
end;
var
f1,f2,f3,f4,f5,f6:text;
begin
assign(f1,'1.txt');
assign(f2,'2.txt');
assign(f3,'3.txt');
assign(f4,'4.txt');
assign(f5,'5.txt');
assign(f6,'6.txt');
imena(f1,f3);
imena(f2,f4);
otlich(f3,f4,f5);
otlich(f4,f3,f6);
end.
Ваша задача достаточно банальна. Но
1) кода чуть больше, чем экран, смотря каким шрифтом
2) могу предложить на языке "Pascal", скачать среду разработки можно по ссылке http://pascalabc.net/ru/ssyilki-dlya-skachivaniya
Надеюсь мой код Вам подойдёт
const
aa='AAAA';
bb='BBBB';
procedure imena(var f,g:text);
var
s:string;
a,b:integer;
begin
reset(f);
rewrite(g);
while not (Eof(f)) do begin
readln(f,s);
a:=pos(aa,s);
b:=pos(bb,s);
if (a<>0) and (b<>0) then begin
delete(s,b,length(s)-b+1);
delete(s,1,a+length(aa)-1);
writeln(g,s);
end;
end;
close(f);
close(g);
end;
procedure otlich(var f,g,h:text);
var
s,t:string;
begin
reset(f);
rewrite(h);
while not (Eof(f)) do begin
readln(f,s);
reset(g);
while not (Eof(g) or (s=t)) do readln(g,t);
if (s<>t) then writeln(h,s);
close(g);
end;
close(f);
close(h);
end;
var
f1,f2,f3,f4,f5,f6:text;
begin
assign(f1,'1.txt');
assign(f2,'2.txt');
assign(f3,'3.txt');
assign(f4,'4.txt');
assign(f5,'5.txt');
assign(f6,'6.txt');
imena(f1,f3);
imena(f2,f4);
otlich(f3,f4,f5);
otlich(f4,f3,f6);
end.
И всё равно, условия неконкретные. Под свойства Виндоусь может подойти что угодно (нпрм sed). Офисом (экселем) действительно можно всё сделать и довольно просто (руками, кодом). Странный препод - задание на программирование и не определено средство: то ли VBA, то ли плюсы. Вам какой курс-то преподают? Хотя, с очень большими файлами офис не справится. Насколько большие - десятки гигабайт, тогда задача перестаёт быть простой.
Роман Колтович
алгоритмы. максимум несколько килобайт, у препода есть текст для проверки, но он не дал его.
Роман Колтович
нужен
"Ариэль Просветленный (31206) 5 часов назад
тут тупо алгоритм запилите по выборке и сортировке... "
и чтоб его работоспособность можно было проверить в виндоусе без установки программ компиляторов, максимум С++
"Ариэль Просветленный (31206) 5 часов назад
тут тупо алгоритм запилите по выборке и сортировке... "
и чтоб его работоспособность можно было проверить в виндоусе без установки программ компиляторов, максимум С++
тут тупо алгоритм запилите по выборке и сортировке...
Роман Колтович
точно, но я синтаксис не знаю, на чём-нибудь можете написать, чтоб работал это алгоритм?
Задача действительно не сложная, но...
Это ВАША задача и здесь она ни кому не интересна. Вы немного не туда попали, здесь люди задают вопросы и отвечают, а вы хотите НАХАЛЯВУ заказать работу. Для заказа работ существуют другие ресурсы, правда там придется платить деньги.
В принципе, если вы готовы платить, высылайте образец файла на почту.
Это ВАША задача и здесь она ни кому не интересна. Вы немного не туда попали, здесь люди задают вопросы и отвечают, а вы хотите НАХАЛЯВУ заказать работу. Для заказа работ существуют другие ресурсы, правда там придется платить деньги.
В принципе, если вы готовы платить, высылайте образец файла на почту.
Роман Колтович
задача слишком проста, чтобы называть её работой. учебная
Роман Колтович
и образца файла нет, препод будет просто код смотреть
А на bash (.cmd) не подойдёт?
Роман Колтович
если речь про коммандную строку windows, то да, главное, чтоб короткий код. Программист, что задал мне эту задачу, сказал что это задача очень лёгкая. Проблемма в том, что я - чайник ;-)
плюнули и растёрли
Роман Колтович
правильный ответ меньше одного экрана кода с++ либо какой-то код в макросе ворда, тоже короткий, но я не программист, не знаю что за код
задание можно разбирать на цитаты! =)
Роман Колтович
Я знаю, что ответ не сложный. Помогите если вы программист, обещаю, что патентовать не буду )
Роман Колтович
Задача тривиальная. Я брюнетка с интеллектом блондинки :-)
Марианна вы как то странно подходите к вопросу. "Опытному программисту расплюнуть" . Я опытный программист и поэтому ценю свои знания и труды, которыми пришел к ним. И вряд ли найдется человек, который будет вам решать подобного рода задачи за даром. Вы не поверите, но вы одна из многих, кто ленится учится, а потом говорит, что "А нафиг мне это надо. Да идиоты только учат. Норм люди списывают". Как следствие у нас больше половины людей говнокодят так, что потом вытираться устанешь от этого.
Роман Колтович
почему программисты считают, что несколько строк стандартного кода - совершенно секретная информация? я не собираюсь работать программистом, разве не видно?
Похожие вопросы
- добрый день подскажите пожалуйста программисты есть отличия между turbo и object Pascal я знаю что object pascal
- Доброй ночи. Как стать программистом с нуля? Есть тут опытные программисты? Как учиться, где учиться? С чего начать?
- Какого рода задачи решает программист уже работаю в индустрии?
- Весьма интересная задача для программистов и математиков (внутри)
- Какие задачи решают программисты на практике?
- Вот скажите мне, какие задачи выполняют программисты начального уровня. См Доп.
- Хочу оригинально поздравить парня с днем рождения, парень программист. Помогите написать интересный код, желательно на С++
- Добрый день. Я решил задачу на Си++
- ВСЕМ ДОБРОГО ДНЯ!!! Хотел спросить на счет...
- Добрый день! Что будет если мы взломали сервер
Спасибо. Очень похоже на правду. Надеюсь так и есть.
И вообще тебя единственного развели
https://ru.wikipedia.org/wiki/Психологическая_манипуляция
Почитай чтобы тебя не разводили больше)