Ответ(ы) на вопрос:
ОТДЕЛ Задание+;
ИСПОЛЬЗУЕТ Вывод ИЗ "...\Отделы\Обмен\", Приём;
ПЕР
x, y, R: ВЕЩ;
УКАЗ
x := Приём.Число();
Вывод.Цепь("^");
y := Приём.Число();
R := 123;
ЕСЛИ x * x + y * y <= R * R ТО
Вывод.Цепь("^Точка попадает.")
ИНАЧЕ
Вывод.Цепь("^Точка не попадает.")
КОН
КОН Задание.
Не нашли ответ?
Похожие вопросы