!
 

³

38 , , 34-46

when_busy

  • 26.10.16, 14:56
program answer_my_when_busy;
       var  im-mess-stack--lnk, im_msg_txt, ans16, ans161, que16, some16me16, me161: char;
begin
clrscr;
writeln (im-mess-stack--lnk); 
readln (some16);
some16: = im-mess-stack--lnk;
writeln (im_msg_txt); 
readln (que16);
que16: = im_msg_text;
      begin
if some16: = "Alex Bendgamin" or some16: = "Alex" or  some16: = id365754624  then 
                begin
   if que16: = ''. ?'' or que16: = ''.'' or que16: = '''' or  que16: = ''. ?''         or que16: = ''. '' then ans16: = ".'', ans161: = ", ."
                 end;
writeln (ans16);
writeln (ans161);
im_msg_text: =  ans16;
im_msg_text: =  ans161;            
       end;
end. 
0