Valentine Аzure
Я смертоносно устал. Пол ночи не спал, меня завалили документами... ужас... ненавижу Т_Т - чуть ли пе плачет.
Флуд #89 В честь светлых идей :3
Сообщений 301 страница 330 из 995
Поделиться3012013-04-02 11:16:00
Поделиться3022013-04-02 11:19:26
Johan
у меня вторая задача не лучше, там палиндром. ее сделать просто, но бля что значит последний? с конца что ли?..
Эль
Оу, бедняга *затаскивает на колени, поглаживая по спине круговыми движениями* а послать их было нельзя?
Поделиться3032013-04-02 11:21:18
Valentine Аzure
*понял, что нихрена не понял* а?..
Поделиться3042013-04-02 11:24:29
Johan
человек, не мучайся. сбереги мозги. могу и зту выслать, но оно тебе надо?
Поделиться3052013-04-02 11:27:40
Valentine Аzure
Ну... мне интересно, кроме того, очень не люблю чего-то не понимать~
Поделиться3062013-04-02 11:28:52
Johan
вот эта задача:
На вход программе подается предложение на английском языке, заканчивающееся точкой. Требуется написать программу, которая определяет, можно ли переставить английские буквы этого предложения (не учитывая остальные символы) так, чтобы получить палиндром – слово, которое читается одинаково слева направо и справа налево. Строчные и прописные буквы не различаются. Если это сделать нельзя, программа должна вывести на экран слово «Нет», а если можно – слово «Да» и в следующей строчке искомое слово прописными буквами. Если таких слов несколько, нужно вывести последнее в алфавитном порядке слово. Например, если исходная последовательность была такая:
Deed daad N.
то результат должен быть следующий:
Да
EDDANADDE
помогло?
Поделиться3072013-04-02 11:30:14
Valentine Аzure
да, я хотя бы понял, в чем была суть задачи *покивал*
Поделиться3082013-04-02 11:31:33
Господи, и тут программирование
*приполз* Доброе утро.
Поделиться3092013-04-02 11:31:50
Johan
гм? мне тобе объяснить что нужно сделать что ли? давай я ее сначало решу.
Поделиться3102013-04-02 11:34:36
Heikki
Привет *о*
Valentine Аzure
Не-не, это мне уже неинтересно *покачал рукой в воздухе* х)
Поделиться3112013-04-02 11:42:33
Heikki
Чем тебе мой паскаль не угодил?
Утро)
Johan
Ну тогда все, успокоились. Я ее уже решил. Не знаю, правильно ли, но решил. Теперь надо вторую помучить. Точнее первую... печаль...
Отредактировано Valentine Аzure (2013-04-02 11:42:59)
Поделиться3122013-04-02 11:47:21
Valentine Аzure
Всем угодил, просто у меня передоз программирования в жизни, поэтому я смотрю на задачу и в голове уже автоматически "посчитать количество цифр, в массив, отсортировать, вывести массив" хД
Johan
Как у тебя дела?)
Поделиться3132013-04-02 11:48:41
Valentine Аzure
Ну, если работает, то, наверное, правильно о3о и кстати, я тож не отдыхаю, я сочинения пишу)
Heikki
У меня болит спина QwQ
Поделиться3142013-04-02 11:52:56
Johan
она в тетради а я на работе. физически не могу проверить, паскаль дома. но должна работать.
Heikki
массив то я как отсортирую? он же все значения в нем попутает. а второй вводить нерационально. а тетрадь с моими записями по массивам дома, и я половину не помню. человек, помоги, а? ну позязяяяя....
Поделиться3152013-04-02 11:54:38
Valentine Аzure
А, ну, я ж не знал, что у тебя на работе нет паскаля)
Поделиться3162013-04-02 11:57:08
Johan
да оно должно работать, просто я там в одном месте нахимичил с подвывертом и не уверен на счет да и нет. вроде там влипил, но возможно что и нет.
Поделиться3172013-04-02 11:59:59
Valentine Аzure
Угу, ну, домой придешь и посмотришь))
Поделиться3182013-04-02 12:02:08
Johan
ну работаю то я не в центре информатики сейчас, а в винтиляции. он здесь не нужен. и мне лень будет вбивать программу если честно.
Поделиться3192013-04-02 12:02:09
Johan
*погладил по спине* И давно?
Valentine Аzure
Почему нерационально? Программа получается раза в 2 короче... Так, стоп, у меня едет крыша
шапка
var
ch: string;
d, p: array[0 .. 1000] of longint;
i, c, j: longint;begin
write("Введите числа: ");
read(ch);for i:= 1 to length(ch) do
inc(d[ord(ch[i]) - 48]);for i:= 0 to 9 do
p[i]:= i;for i:= 1 to 100 do
for j:= 0 to 8 do
if (d[p[j]] > d[p[j + 1]]) then begin
c:=p[j];
p[j]:=p[j + 1];
p[j + 1]:=c;
end;for i:= 0 to 9 do
if (d[p[i]] <> 0) then
writeln("Итоговая строка: ", p[i]);
read
end.
Поделиться3202013-04-02 12:09:03
Valentine Аzure
Ага *покивал* тебе виднее~
Ну а проверить-то? :3
Heikki
С утра QwQ я вчера перенапрягся, когда тянулся .__.
Поделиться3212013-04-02 12:13:40
привет всем) *помахал рукой*
Поделиться3222013-04-02 12:13:51
Johan
да зачем? я даже если исправлю ошибку сам не пойму. пусть лучше объяснят почему так а не иначе.
Heikki
я понял примерно после второго фор. но вот строку инк не знаю что значит и зачем минус сорок восемь? в общем, я немного запутался... не люблю разбирать чужие программы. да и вообще для меня сложно. не тот уровень, ога.
Отредактировано Valentine Аzure (2013-04-02 12:15:11)
Поделиться3232013-04-02 12:16:13
Kohaku Rio
Привет, Пинька *радостно помахал*
Valentine Аzure
Сам не поймешь, что исправил? О.о
Поделиться3242013-04-02 12:16:36
Johan
как у вас дела?
Поделиться3252013-04-02 12:18:14
Kohaku Rio
Спина болит и я все еще один :о
Поделиться3262013-04-02 12:18:53
Johan
что исправил пойму, но не пойму почему именно так надо исправлять. ну и если будет грубая ошибка может где-то зацепиться.
Поделиться3272013-04-02 12:24:01
Johan
всё ещё? *задумался* а ты кого искал? и почему спина болит?
Поделиться3282013-04-02 12:24:06
Valentine Аzure
Я это попробовал в паскале - у самого не работает, где-то я начудил... =_= Из меня сейчас плохой объясняльщик, тут твою программу надо видеть( Или хотя бы её логику знать.
Поделиться3292013-04-02 12:27:53
Heikki
у моей программы есть только начало.
не мучайся, я спрошу у учителя. там мне все в деталях объяснят.
хорошо поработал: анкету на птиц пописал, информатику поделал, флуд посетил. какой продуктивный рабочий день! мне через пол часа домой надо, а я ни листа не сложил.
Поделиться3302013-04-02 12:36:24
Valentine Аzure
Типовая задача, мне теперь стыдно...
А тебе надо было много бумаг сложить?


















