using System;
class Program
{
static void Main(string[] args)
{
Console.WriteLine("Введите координату x точки");
double x = int.Parse(Console.ReadLine());
Console.WriteLine("Введите координату y точки");
double y = int.Parse(Console.ReadLine());
Console.WriteLine("Введите радиус");
double r = int.Parse(Console.ReadLine());
double d = Math.Sqrt(Math.Pow(-x, 2) + Math.Pow(-y, 2));
Console.WriteLine(d);
if (d < r){
Console.WriteLine("Да");}
else if (d == r){
Console.WriteLine("На границе");}
else{
Console.WriteLine("Нет");}
Console.ReadKey();
}
}
var
x,a,y,b,m,n: integer;
begin
write ('Введите значения в порядке [x,a,y,b,m,n]: ');
read (x,a,y,b,m,n);
x:=x*a; y:=y*b;
var x1:= x-x*(a/100);
var y1:= y+y*(b/100);
write ('Покупка оказалась дороже на ',(x+y > x1+y1)? 'предыдущей ':'этой',' неделе');
end.