Решите задачу по информатике

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

ну можно, если на паскале, в одной прописать асижн (вызов файла), реврайт, записать туда переменные. а в другой программе прописать чтение переменной из файла, если ты об а так например импорт-экспорт есть во многих прогах (оффис вот

всего длина окружности составляет 2пr, а половина - пr

138 байт,потому что 1024 бита=128 байт=> 10+128=138 как-то так.