Вы можете уменьшить размер файлов и пространство на диске с сжатия рисунков в документе. параметры сжатия уменьшают как размер файл, так и размеры рисунков, в зависимости от того, как планируется использовать изображение, например для просмотра на экране или в сообщении электронной почты. сжать можно все рисунки в файле или только специально выделенные. если документ сохранен в более старом формате doc, то параметр "уменьшить размер файла" не будет доступен в меню "файл". чтобы использовать параметр "уменьшить размер файла", сохраните документ в новом формате docx.
Над найти расстояние от точки до центра окружности. Прще использовать квадрат расстояния. Если он равен квадрату радиуса, то точка на окружности. Если меньше, то внутри круга. Больше, то вне круга.
var xm,ym,xc,yc,r:real; begin writeln('Введите координаты точки Xm, Ym'); readln(xm,ym); writeln('Введите координаты центра окружности Xc, Yc'); readln(xc,yc); writeln('Введите радиус окружности R'); readln(r); if sqr(r)=sqr(xm-xc)+sqr(ym-yc) then writeln ('На окружности') else if sqr(r)>sqr(xm-xc)+sqr(ym-yc) then writeln ('Внутри круга') else writeln('Снаружи круга'); end.
Тест №1 Введите координаты точки Xm, Ym 4 2 Введите координаты центра окружности Xc, Yc 2 2 Введите радиус окружности R 2 На окружности
Тест №2 Введите координаты точки Xm, Ym 3 1 Введите координаты центра окружности Xc, Yc 2 2 Введите радиус окружности R 2 Внутри круга
Тест №3 Введите координаты точки Xm, Ym -1 -3 Введите координаты центра окружности Xc, Yc 2 2 Введите радиус окружности R 2 Снаружи круга