Паскаль, лабораторная на экзамен-автомат

[student_bstu]

помогите пожалуйста написать программу в Паскаль. 3 задачи уже сделал, а этой что-то ладу не дам. Вот условие:
Определить, попадает ли точка (х, у) в круг радиуса R с центром в
точке (а; b). Вывести признак N = 1, если точка находится в круге и
N = 0 – в противном случае. Если можете, напишите полностью всю программу.
Заранее спасибо.

[Serge_Bliznykov]

исключительно за вежливость...

var x,y, a,b, R : integer;  {все  числа целые. если допустимы дробные,
                                                   тип поменять на real или на double}
  N : integer;
begin
  WriteLn('Vvedite a,b, R, x,y');
  Readln(a,b, R, x,y);

  if sqrt(sqr(x-a) + sqr(y-b) ) <= R 
    then N := 1
    else N := 0;

  WriteLn(' N = ', N);
  ReadLn;
end.

[student_bstu]

cпасибо огромное