В якому пристрої реалізується опрацювання повідомлень?

можно назвать - собака 

или 

агент @ мail.ru 

program;   var  i: byte;   str: string;   begin  for i: =60 to 70 do  begin  str: =str+chr(i) ;   end;   writeln(str);   end.

389 365 402 201

триста восемьдесят девять миллиардов триста шестьдесят пять миллионов четыреста две тысячи двести один

var

a,b,c: real;

begin

readln(a,b,c);

writeln((a+b+c)/3);

end.