Выводит ошибку проверки диапазона
10.06.2012program example; uses crt,graph; type s=record x,y,vx,vy,m,ax,ay:real; end; var dr,md:integer; telo1,telo2:s;...