Я не програмист...мой друг тоже ! но какоетьоо представление Паскаля у нас ещё осталось...в глубинах извилин !
Вобщем,началось всё с того что сидели и учили физику ....а потом задолбало..началась перепись по аське..
Предлагаю её вашему вниманию... $t@tiX (23:25:34 26/11/2006)
даффай покурим вместе?
SiMaX (23:26:44 26/11/2006)
трафа эта називается ВООБРАЖАЕМЫЙ МОЗГОВЁРТ
$t@tiX (23:27:49 26/11/2006)
я ужо почти выполнил format://MOZG
$t@tiX (23:27:54 26/11/2006)
но одумался
SiMaX (23:29:34 26/11/2006)
надо не форматировать...Надо приконую прогу поставить GGOHTOVARISCHNEPODETSKI ver 5.1
$t@tiX (23:30:02 26/11/2006)
ууу...ыыыы....аааа...оО!!!!
SiMaX (23:31:33 26/11/2006)
а на здачу грузони себе PREVEDNAMOROZ 1.0
$t@tiX (23:35:43 26/11/2006)
ага...
program sendprepodtogazenvagen
var
prepod,dekan:string
student:log
zachotka,vodka:integer
begin
gotodekanat(3,220)
gotodekan(3,220)
zachotka =vodka+dekan;
gotoprepod(4,205);
printf('Nado 5')
zachetka=5
gohome(program troewina);
end.
фуххх...асилил
$t@tiX (23:51:02 26/11/2006)
чё,запустить решил?
SiMaX (23:53:47 26/11/2006)
program sendprepodtogazenvagen
var
prepod,dekan:string
student:log
zachotka,vodka:integer
begin
gotodekanat(3,220);
gotodekan(3,220);
zachotka=vodka+dekan;
gotoprepod(4,205);
writeln('Nado 5');
readln ('vodku davai');
procesact('give vodka to prepod');
loadproc('vodka=za4otka(5));
writeln('priatno imet s vami delo')'
readln('zahodite es4e');
gokafe(program - drinks);
program (marshrutka)
programhome
end.
$t@tiX (23:54:35 26/11/2006)
=)))
SiMaX (23:56:43 26/11/2006)
доработать..
$t@tiX (23:57:13 26/11/2006)
скомпилировать,чтоб работала под ОС "КП" (ЄТО ЕЩЁ ОДИН ЗАГОН...ВАМ ЛУЧШЕ ЕГО НЕ ЗНАТЬ)
SiMaX (00:04:40 27/11/2006)
program sendprepodtogazenvagen
var
prepod,dekan:string
student:log
zachotka,vodka:integer
begin
gotodekanat(3,220);
gotodekan(3,220);
zachotka=vodka+dekan;
gotoprepod(4,205);
writeln('Nado 5');
readln ('vodku davai');
procesact('give vodka to prepod');
loadproc('vodka=za4otka(5));
writeln('priatno imet s vami delo')'
readln('zahodite es4e');
gokafe(program - drinks);
program (marshrutka)
programhome
end.
if decan-padla
then program sendprepodtogazenvagenpadla
begin
gotodekanat(3,220);
gotodekanpadla(3,220);
zachotka=vodka+dekan;
gotoprepod(4,205);
writeln('Nado 5');
readln ('dengi davai');
procesact('give dengi to prepod');
readln('mala.davai es4e');
procesacs('dat es4e deneg');
readln('es4e davai');
writeln('bolshe netu;)
loadproc('dengi*2=za4otka(4));
writeln('hotel 5')'
readln('rabotai negr');
writeln(mind, 'suka.tvar golimaia');
gokiosk(program -bye deshoviyvodka );
program (drink)
programautopilot
end.
$t@tiX (00:06:32 27/11/2006)
: )))))
все написано біло ..чисто поржать..!
Приношу извенение за встречающиеся там грубые слова..(надеюсь админы поймут)