
Андрюш, так много амулетиков получится

а вообще главный флудильщик это ... модератор флудилки 8)
или... Командир Флуда... ну мысль понятна :)
Подружка сказала,что это практически портрет!(Особенно про расчет и измены) :) :) :) Еще раз спасибо :flowers:Adry писал(а):джонни115
Кассандра знает себе цену.
Всегда обдуман её ход;
Она ведет всему расчёт.
Рассудку не ища замену.
Ей комплименты по душе.
Цветы, подарки, восхищенья;
Изменам только нет прощенья,
И рай не мил ей в шалаше.
Кассандру пусть не покидают
Восторги джентльменских глаз,
Пусть ей они ещё не раз
Своё вниманье уделяют!
Код: Выделить всё
program query;
uses crt;
var
fBestFlooder, fQty: integer;
begin
clrscr();
Textcolor(2);
....//Вычитка предыдущего значения из базы fQty
Writeln("Выберите кандидата во флудильщики.");
Writeln("===========================");
Writeln("1- Nikolay2009");
Writeln("2- Nikolay2009");
Writeln("3- Nikolay2009");
Writeln("4- Nikolay2009");
Readln(fBestFlooder);
inc(fQty, fBestFlooder);
...//Запись количества в базу
Writeln("За Nikolay2009, проголосовали ", fQty:2);
end.
На что хочешь :) Но надпись "Главный флудильщик ТМ" там будет :-Р :)Nikolay2009 писал(а):а на что амулет мне выбрать можно?
Luke писал(а):Шо Ви куме не кажіть, а амулет всеодно КОТайський!!!!!
А фигушки, то нету :-Р Все хана, перезагрузка...Luke писал(а):program query;
uses crt;
var
fBestFlooder, fQty: integer;
begin
clrscr();
Textcolor(2);
....//Вычитка предыдущего значения из базы fQty
Writeln("Выберите кандидата во флудильщики.");
Writeln("===========================");
GoTo фигушки;
Writeln("1- Nikolay2009");
Writeln("2- Nikolay2009");
Writeln("3- Nikolay2009");
Writeln("4- Nikolay2009");
Readln(fBestFlooder);
inc(fQty, fBestFlooder);
...//Запись количества в базу
Writeln("За Nikolay2009, проголосовали ", fQty:2);
end.
=-0 С чего это Вы взяли? :)tiron писал(а):И это Вас разозлило? Дети в песочнице поди и не так обзываются...