Question

Задание 1 (100 баллов). Дано уравнение окружности в виде: х2+у2=49. С клавиатуры вводятся координаты х, y точки M(2, 4). Если точка оказывается внутри заданной области, то вывести сообщение «Точка принадлежит области», в противном случае вывести сообщение «Точка не принадлежит области». В отчет включить текст программы на Паскале, реакцию ЭВМ.

Answer 1

Ответ:

program Program1;

VAR a,b:integer;

begin

Writeln('Введите x и y');

Readln(a,b);

if a*a+b*b=49  then

Writeln('Находится')

     else writeln('не находится');

end.