1,25Кбайт=1280байт
1280/120 байт/с - скорость передачи
250/(1280/120)= 23,4375с - время передачи 250 байт информации
Лишнее конвер
остальные выписывай
Модем - модулятор-демодулятор...
Var x,y,r:real;
begin
write('x, y: ');
readln(x,y);
write('R = ');
readln(r);
if x*x+y*y>r*r
then writeln('точка находится внутри круга')
else if x*x+y*y=r*r
then writeln('Точка находится на окружности')
else writeln('Точка находится вне круга');
end.
Пример:
x, y: 3 4
R = 5
Точка находится на окружности