موجودی به نام برنامه نویس

//فرض اینکه همه ورودیها قبلا تعریف شده
//زبان انگلیسی من افتزاح باشه پس گیر به لغتاش ندین
//این فقط شبه کد
procedure mankind
var  time,Mankind
begin

read(mankind)

//تشخیص برنامه نویس
if mankind.IQ<=100 then
   exit;

if (mankind.fashion <> Null) and (mankind.magnate) then
   exit;

if mankind.NumberLanguagesTaught<3  then
   exit;

if mankind.Puffyeyes<>null then
   exit;

if mankind.StaminaBody <80% then
   exit;

if mankind.Abilityengage<99 then
   exit;
//engage manzor hamon gir dadan khodemon
 
if (mankind.DynamicMind=Null) and (mankind.PowerAnalysis =Null) and (mankind.GoodDesign=Null) then 
   exit;

if (mankind.SpendingMoreTimeComputers<99%) then 
   exit;

write('Programmer if possible')

for i=1 to 7 do begin
if mankind.Update=99% then
   Breack;

//زندگی یک روز برنامه نویس
   for i :=1 to 24 do
    begin
    time:=now;
 
    if time = 7 then
        write('System will turn ')

     if time = 8 then
        write('System will restart because  of the High volume of information   ')\\jomle bandio hal kardin

     if time = 9 then
        write('Open the fridge')

     if time = 10 then
        write('wowwww Full load Windows ')\\ejmaan salavat

     if time = 11 then
        write(' Browsing in the internet')

     if time = 12 then
        write(' begin design program')

     if time = 13 then
        write(' Say prayer and have dinner')

     if time = 14 then
        write(' Begin Programming ')

     if time = 15 then
        write(' Compile the programm and Save')

     if time = 15:10 then
        write(' show 365 errors ')

    if time = 16 then
        write(' take a nap')

    if time = 17 then
        write(' debug programmer ')

    if time = 18 then
        write(' debug programmer ')

    if time = 19 then
        write(' Compile again ')

    if time = 19:05 then
        write(' show 364 errors  ')

    if time = 20 then
        write(' Trace Program  ')

    if time = 21 then
        write(' compile Program and debug ')

    if time = 22 then
        write(' show 1 errors  ')

    if time = 23 then
        write(' Jumping fuse   ')

    if time = 24 then
        write('try to recovery ')

    if time = 01 then
        write('Drinking water and relaxation ')

    if time = 02 then
        write('Compile again and show 1 error and trace')

    if time = 03 then
        write('Excite programmer because find problem -->The problem is ;')

    if time = 04 then
        write('no problem Syntactic but 2 problem in Logical ')

    if time = 05 then
        write('no problem Syntactic but 2 problem in Logical ')

    if time = 06 then
        write('Customer Delivery but Customer demands are quite different and Do not get any money   ')

     end;//end for

if mankind.energy<0.00012 then
   breck;

end;    
end;