Регистрация
jcyueurur
14.11.2022 09:24
Информатика
Есть ответ 👍

Даны два целых числа A и B (A < B). Найти произведение всех целых чисел от A до B включительно.
На C#

272
344
Посмотреть ответы 1

Ответы на вопрос:

ЦаринаПятёрок
ЦаринаПятёрок
4,4(4 оценок)

var

  x, y, r, oa, ob: real;

 

begin

  writeln('введите радиус окружности r');

  readln(r);

  writeln('введите координаты центра окружности');

  readln(oa, ob);

  writeln('введите координаты точки');

  readln(x, y);

  if (x > (oa - r)) and (x < (oa + r)) and (y   > (ob - r)) and (y < (ob + r)) then

    writeln('точка с заданными координатами лежит внутри круга')

  else

    writeln('точка с заданными координатами лежит вне круга');

end. 

если все правильно, отметь решение как лучшее)

Популярно: Информатика