Любое использование материалов U-mama.ru возможно только с предварительного письменного согласия АО «ЦТВ».
Администрация сайта не несет ответственности за содержание сообщений, публикуемых в форумах, доске объявлений, в отзывах и комментариях к материалам.
main()
{ she = alloc_first_she(nice, pretty, tall, smart, rich);
while (!dead(me))
{
....
if ( she->love != me )
{
free(she);
she = alloc_new_she(--nice, --pretty, --tall,
--smart, --rich);
}
else
{
f...ck(she);
new_she = alloc_new_she(++nice, ++pretty,
++tall, ++smart, ++rich);
if( new_she && new_she->love == me )
{
free(she);
she = new_she;
}
else
{
free(new_she);
nice--;
pretty--;
tall--;
smart--;
reach--;
}
}
....
}
free(me);
return 0;
}
:D :D :D
Эх молодость... правда несколько грубо получилось...
сорри за вб))))))
begin
find.girl
meet_party.girl
if girl.f##ck = "true" then begin
girl_num_int = girl_num_int + 1
if girl.love = "true" then begin
ignore.girl
else
phone_number(girl_num_int) = girl.phone_number
end
end
goto Find.girl
end.
а простые сметны значит должны голову ломаьт, да???
у. искуситель... :(
:)
:D :D :D :D
придется мужа с работы ждать :)
:D
мой не пргораммер...
я про своего :)
прикольна
ето смешнее :D
у сяшников элегантней получилось - поиск самой клёвой тёлки по параметрам :)
зато на паскале сурово так - перебор по принципу поручика Ржевского :)
Спасибо :)
1000 лет не программил(( это-то ели как скреативил)))))
только все таки не паскаль, а Visual Basic :)
:D :D :D
да одна баня - по-проще ;)
а на си - пока вдумаешься, мысль потеряешь :D я оттуда вообще уже ничё не помню....
еще надо женский вариант придумать. что-нибудь типа
begin
1:
begin
end
girl.speak = 10rnd
for z_int = 1 to 10
t_int=rnd+t_int
next z_int
girl.speak = t_int
2:
girl.speak = 10rnd+rnd
goto rnd(1,2,3)
3:
if man.character = "nice" and man.character = "rich" and man.character = "smart" then begin
y = rnd
x = rnd
if rnd(x,y) rnd(=,>,меньше) rnd(x,y) then begin
girl.speak = rnd(может быть, не знаю, голова болит)
end
end
goto 2
end.
:D :D :D :D
извините конечно:)Сообщение было изменено пользователем 16-10-2007 в 22:07
:) Улыбнуло
:D :D
нет понимаешь использования ОПП, где классы, процеду потоки и наследование?:)
на асемблере надо писать:)
Гадаю по листингам программ. Снимаю глюки. Навожу трояны :)
(Программистами не рождаются - это последствия родовой травмы… )Сообщение было изменено пользователем 21-10-2007 в 09:06
Биология для программистов: жёлудь - это заархивированный дуб :)
Вначале был бит, потом байт, и только потом появилось слово.
Любовь уже кончилась, а мы так и не успели ни о чем договориться...
усем смешно, а я как в танке, ни аглицкого, ни программерского не ведаю... :(