Вводятся координаты (x;y) точки и радиус круга (r). Определить принадлежит ли данная точка кругу, если его центр находится в начале координат.
Будем считать, что точка принадлежит кругу, если находится внутри его или на его окружности.
Из любой точки координатной плоскости можно провести отрезок к началу координат. Если длина этого отрезка больше радиуса круга, то точка лежит за пределами круга и, следовательно, не принадлежит ему. Если же отрезок, соединяющий точку и начало координат, меньше радиуса круга с центром в начале координат или равен ему, то точка будет принадлежать кругу.
x=2
while x<=10:
(пробел)print('x в квадрате равен', x**2)
(пробел)x+=2
Паскаль:
begin
x:=2;
while x<=10
begin
println('x в квадрате равен ', x*x);
x:=x+2;
end;
end.